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Abstract 


The  Mobile  Autonomous  Robot  Research  System  (MARRS-1) 
was  created  as  the  first  of  a  series  of  autonomous  vehicle 
prototypes  for  the  Air  Force  Institute  of  Technology.  The 
major  accomplishment  in  developing  MARRS-1  is  the 
integration  of  Optical  Shaft  Encoder  (OSE)  data  with 
Ultrasonic  Sonar  range  and  direction  information  to  produce 
accurate  environmental  maps  that  are  relative  to  the  robot. 
The  OSE  and  Sonar  subsystems  make  up  the  most  important  part 
of  MARRS-l's  Navigation  Computer.  With  these  two  subsystems 
and  minimal  additional  software,  mapping  and  obstacle 
avoidance  become  a  reality.  The  thesis  includes  schematics, 
parts  list,  and  software  listings  for  the  MARRS-1  Navigation 
Computer.  Additionally,  the  mapping  and  navigation 
algorithmsare  shown  implemented  in  the  BASIC  language  with 
numerous  example  graphics  maps  created  by  the  integrated 


MARRS-1  robot.  Issues  involved  in  solving  mobile  robotics 
problems  are  discussed.  ~  thy  krtn+4u  fanJLt&Z/  j 
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CREATING  A  MOBILE  AUTONOMOUS  ROBOT  RESEARCH  SYSTEM  (MARRS) 


I.  Introduction 


Background 

A  Nuclear,  Biological,  Chemical  (NBC)  contaminated 
environment  presents  a  severe  hazard  for  aircraft  ground 
maintenance  crews.  A  mobile  autonomous  robot  capable  of 
performing  simple  aircraft  maintenance  tasks  could  protect 
many  lives  from  NBC  exposure  while  allowing  the  Air  Force  to 
maintain  its  combat  readiness. 

In  order  for  a  mobile  autonomous  robot  to  function 
properly  on  a  flight  line,  the  robot  must  perform  the 
following  tasks: 

1)  Avoid  obstacles  (both  static  and  dynamic), 

2)  Locate  the  appropriate  aircraft, 

3)  Perform  fueling  and/or  maintenance, 

4)  Return  to  previous  work  station. 

Early  AFIT  efforts  in  mobile  robotics  were  hampered  by 
a  lack  of  suitable  hardware  and  software  support  (1:59-66). 
The  acquisition  of  a  Heathkit  Hero-1  robot,  laser  barcode 
reader,  and  additional  sonar  sensors  by  lLt  Randall  J.  Owen 
II  for  his  thesis  (2:1-3)  was  a  great  move  forward  for  AFIT 
in  mobile  robotics.  Before  any  autonomous  vehicle  can  fuel 
i,s  first  aircraft  there  are  however,  several  problems  which 
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must  be  overcome.  These  problems  may  seem  crivial  but  in 
fact  are  the  limiting  factors  in  mobile  robotics  today. 
Many  of  these  problems  are  found  in  the  Hero-1  as  well  as 
other  robot  systems: 

1)  Lack  of  robot  software, 

2)  Combined  error  effects  in  the  robot, 

3)  Reduced  robot  efficiency  due  to  the  dedication 
of  resources  for  error  compensation, 

4)  Understanding  and  reducing  the  amount  of 
performance  data. 

Objective 

This  thesis  is  a  follow-on  effort  to  Lt  Owen's  thesis: 
"Environmental  Mapping  by  a  Hero-1  Robot  Using  Sonar  and  a 
Laser  Barcode  Scanner".  The  main  objective  of  this  thesis 
is  to  continue  the  development  towards  an  autonomous  robot 
capable  of  moving  from  one  location  to  another  while 
avoiding  obstacles.  However,  the  thesis  effort  is  divided 
into  the  following  sub-objectives: 

1)  Identify  and  eliminate  design  deficiencies  in 
the  AFIT  HERO  robot. 

1)  Establish  a  software  development  capability 

for  the  AFIT  HERO  robot. 

2)  Establish  a  library  of  robot  programming 
software  and  algorithms. 


3}  Create  and  conduct  tests  that  will  identify 
system  errors  and  provide  figures  of  merit  on 
robot  performance. 

4)  Establish  an  AFIT  mobile  robotics  laboratory. 

Why  MARRS-1 

The  HERO-1  robot  has  many  design  deficiencies  (chapter 
III)  that  make  it  difficult  to  continue  its  use  as  a 
research  robot  beyond  what  has  been  done  by  Lt.  Owen.  The 
two  greatest  deficiencies  of  the  HERO-1  are  the  front  wheel 
design  and  the  lack  of  online  and  offline  software 
development  capabilities.  The  ability  to  rapidly  develop 
and  debug  software  was  seen  as  one  of  the  most  important 
improvements  needed  in  the  AFIT  mobile  robotics  research 
environment.  HERO-1  robot  programmers  are  required  to  write 
programs  in  machine  language,  assemble  the  code  by  hand, 
then  enter  the  c">de  as  hexadecimal  numbers  from  a  keypad  on 
the  rob'- 1.  Programs  once  loaded  on  the  robot  may  then  be 
saved,  for  later  use,  on  audio  cassette  at  300  baud.  A 
better  approach  to  mobile  robot  programming  is  necessary. 

Although  the  HERO-1  is  well  endowed  with  sensors  (a 
single  three  degree  beamwidth  ultrasonic  sonar  range 
finder,  a  256  level  light  intensity  sensor,  a  256  level 
sound  volume  sensor,  an  ultrasonic  motion  detector,  and 
wheel  odometer)  ,its  abundant  selection  of  sensors  is 
thwarted  by  its  lack  of  useful  and  user  friendly  software. 


To  make  things  worse,  the  HERO-1  robot  operates  in  an  open 
loop  (no  active  feedback)  mode.  A  quality  mobile  research 
robot  was  needed  but  could  not  be  found  commercially.  Two 
options  were  available: 

1)  Build  a  mobile  robot  from  scratch. 

2)  Improve  the  existing  HERO-1  design. 

The  second  option  was  taken  resulting  in  a  robot  named 
Nobile  Autonomous  Kooot  Research  System  (MARRS)-l.  This 
also  resulted  in  the  creation  of  the  AFIT  Mobile  Robotics 
laboratory  which  initially  came  more  as  a  necessity  rather 
than  as  a  conscious  effort. 

AFIT's  mobile  robotics  research  was  being  conducted  in 
the  Electrical  Engineering  Department's  Signal  Processing 
laboratory.  Work  space  there  was  at  a  premium.  A  search 
for  lab  space  and  a  mobile  robotics  test  range  resulted  in 
moving  the  research  effort  to  a  building  needing 
rehabilitation.  Over  a  period  of  months  of  scrounging  for 
equipment,  furniture,  and  supplies,  the  new  mobile  robotics 
work  area  was  in  fact  a  laboratory.  AFIT  building 
renovation  plans  have  identified  800  square  feet  for 
mobile  robotics  research. 


II.  Background  Issues  of  Mobile  Robotics 


Basic  Requirements  for  a  Mobile  Robot 

If  a  robot  is  going  to  move  about  from  one  location 
(present  position)  to  another  (the  goal),  then  several 
important  criteria  must  be  met.  The  robot  must  know  its 
initial  location  and  heading  with  respect  to  some  reference 
point.  The  location  of  the  goal  must  also  be  specified  with 
respect  to  the  reference  point  or  to  the  robot's  own 
position.  Knowledge  of  the  location  of  all  objects  around 
the  robot  and  what  the  objects  are  may  not  be  important. 
However,  the  locations  of  obstacles  are  significant  for  path 
planning.  An  object  becomes  an  obstacle  when  it  becomes 
apparent  that  the  object  lies  or  will  lie  along  the  robot's 
path  towards  the  goal.  This  situation  is  analogous  to  a 
human  that  suffers  from  agnosia.  The  person  is  unable  to 
identify  what  some  objects  are  but  is  aware  of  the  object’s 
presence  and  can  maneuver  around  them.  Navigation  can  be 
accomplished  in  a  timely  manner  only  if  position 
information  can  be  gathered,  coupled  together,  interpreted, 
and  acted  upon. 

Four  basic  elements  are.  required  to  create  a  robot  that 
can  maneuver  its  way  around  objects. 

1)  A  computer  (hardware)  is  required  to  process  sensor 
data  and  to  provide  control  logic  to  the  robot  subsystems. 

2)  A  drive  system  is  needed  for  mobility.  The  most 
common  mobile  robot  drive  systems  are  composed  of  digital 
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controlled  DC  motors  turning  wheels  since  articulate  legs 
are  very  rare  because  of  their  complexity  and  expense  (3:2). 
Feedback  must  be  provided  from  the  drive  system  to  the 
computer  to  give  vital  information  such  as  accelerat ion, 
velocity,  distance  traveled,  and  heading. 

3)  A  variety  of  types  of  sensors  are  needed  to  provide 
the  robot  with  far  and  near  range  obstacle  detection,  object 
identification,  and  sensory  system  cross-checks.  These 
sensors,  coupled  with  the  drive  system  feedback  give  the 
computer  the  information  necessary  to  maintain  an  accurate 
estimation  of  its  current  position  and  heading. 

4)  Computer  programs  (software)  are  needed  to  interpret 
sensory  information,  plan/execute  required  operations,  and 
control  robot  subsystems. 

Computer  Hardware 

Until  a  few  years  ago  autonomous  vehicles  were  unheard 
of  in  real  life.  The  advent  of  the  microcomputer  has  made 
fact  possible  out  of  fiction. 

The  two  most  important  uses  of  a  microcomputer  in 
robotics  are  device  control  and  data  processing.  In  a 
dynamic  environment,  multiple  computers  may  be  employed  to 
process  data  and  control  devices. 

Several  prototype  robots  with  multiple  computers 
operate  under  a  master-slave  principle.  Generally  the 
motion  controllers  act  as  slaves  to  the  sensory 
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processors/interpretecs.  Communication  between  masters  and 
slaves  is  handled  by  an  interrupt  scheme  (4:212). 

Computational  Element  Selection 

Computational  elements  in  a  robot  can  be  anything  from 
a  hydraulic  valve  to  a  multiuser/multiprocessor  mainframe 
computer.  Fornow,  the  discussion  centers  on  digital 
microprocessors  since  most  present  day  robotics  projects  are 
so  based.  It  should  be  be  remembered,  however,  that  there 
are  many  alternatives  available  for  fulfilling  a  robot's 
computational  needs. 

Microprocessor  Features  of  Interest 

Although  the  following  list  of  microprocessor  features 
is  not  complete  nor  exhaustive  in  identifying  a  robot 
designer's  needs,  it  does  point  to  those  features  needing 
greatest  consideration  when  choosing  a  microprocessor  for  an 
imbedded  robotics  computer  application.  The  features  are: 

1  Existing  software  support; 

2  Interrupt  structure: 

a.  Nonmaskable  interrupt; 

b.  Maskable  interrupt; 

c.  Software  or  System  interrupt; 

d.  Priority  interrupt; 

e.  Buffered  interrupts  when  masked; 

3  Input/Output  facilities; 


4  Instruction  set  and  addressing  modes; 

5  A  Test  and  Set  instruction  for  resource  control; 

6  Addressable  memory  space; 

7  Hardware  support  chips: 

a.  DMA  controller; 

b.  Memory  management; 

c.  Numeric  coprocessor  for  floating  point 

operations ; 

d.  I/O; 

8  Special  supervisor  modes  for  system  failsafe 
monitoring; 

9  Processor  compatibility  with  support  chips /devices; 

10  Minimum  system  and  support  cost;  and 

11  Development  team  familiarity  with  the  chosen 

microprocessor. 

Existing  software  to  support  the  chosen  microprocessor 
has  to  be  the  single  most  important  factor  used  in  the 
selection  process  since  90%  of  project  costs  historically 
have  been  for  software  development.  By  procuring  commercial 
support  software,  in-house  software  development  overhead  is 
decreased  and  more  resources  can  be  directed  toward  robot 
specific  software.  Development  team  familiarity  with  a 
given  microprocessor  has  been  an  overriding  choice  factor  in 
a  number  of  projects  such  as  in  the  development  of  the 
Motorola  6808  based  HERO-1  robot. 
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In  reviewing  the  presently  available  microprocessors 
against  the  above  criteria,  the  Z80  microprocessor  is  the 
best  choice  (here  at  AFIT)  mai  lly  because  of  available 
hardware/software  support.  However,  when  not  considering 
available  support,  the  MC68000  family  of  microprocessors  has 
the  best  feature  set  for  robotics  applications  because 
(5,6,7): 


1  Its  memory  oriented  architecture  (as  opposed 
to  register  oriented)  facilitates  memory  to  memory  transfers 
of  data  which  is  very  useful  for  sensory  data  processing. 

2  Sixteen  Megabytes  of  memory  may  be  directly 
addressed  allowing  for  a  mobile  robot  to  carry  with  it  a 
tremendous  amount  of  instructions  and  data  without  the  need 
for  an  external  mass  storage  device. 

3  A  test  and  set  instruction  is  provided  for 
controlling  access  to  shared  resources  in  a  multiprocess, 
multiprocessor,  and/or  interrupt  driven  environment  typical 
of  robot  designs  and  applications. 

4  Synchronous  or  asynchronous  interfacing  to 
external  devices  allows  great  flexibility  to  the  hardware 
designer. 

5  Any  combination  of  processor  registers  may  be 
saved  or  restored  with  a  single  instruction. 

6  All  program  code  is  directly  relocatable 
since  all  address  references  are  added  to  a  base  register 
that  is  set  to  effect  the  relocation. 


1 1  -5 


7  The  UNIX  operating  system  is  widely  used  for 
MC68000  systems  and  has  with  it  some  very  powerful  features. 
However,  the  overhead  in  terms  of  memory  usage  and  speed  of 
execution  may  make  this  a  negative  feature  for  mobile 
robotics.  Also,  although  UNIX  is  multiuser/multitasking,  it 
is  not  optimized  for  the  realtime  computational  environment 
required  by  robotics.  It  is,  however,  a  very  powerful 
operating  system  for  software  development. 

T  day's  choice  in  the  use  of  a  particular  microprocessor 
for  a  robotics  application  may  not  be  tomorrow's  choice. 
Designers  must  plan  for  an  upward  migration  of  requirements 
and  capabilities  and  yet  accomplish  tomorrow's  job  today. 


Mechanical  Drive 

A  typical  drive  system  of  a  robot  utilizes  a  computer 
controlled  DC  motor  capable  of  variable  speeds  in  both 
forward  and  reverse  directions.  Motors  are  mounted  on  one 
or  more  wheels  to  provide  steering  and  motion  control. 


Mechanical  Device  Performance  (8:12-24) 

Software  routines  that  control  mechanical  devices  must 
be  designed  with  the  following  items  in  mind: 

1  Servo  systems  roust  be  stable  over  wide 

dynamic  ranges. 

2  Spatial  resolution  has  finite  errors 
(mechanical  accuracy)  and  errors  due  to  quantization. 
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3  Repeatability  is  mote  difficult  when  the 

mechanical  accuracy  of  the  robot  is  less 
than  the  accuracy  of  sensory  data 

used  to  the  robot's  action. 

4  Repeatability  will  suffer  from  component 
wear  and  aging. 

5  Errors  will  accumulate.  Sensory  data 

must  be  used  to  update  mechanical  device 
commands. 

6  Compliance  to  a  command  may  be  dependent 
upon  the  mechanical  loading  of  system 
components . 

7  Compliance  to  a  command  may  exhibit  a 

hysteresis  effect  depending  on  the 
direction  of  arrival  (such  as  an 
accumulated  360  degree  turn  from  the 
right  is  really  365  degrees  but  coming 
from  the  left  it  is  only  355  degrees). 

8  Oscillations  may  occur  if  command 

compliance  is  too  slow. 


Sensors 

Without  sensors,  a  robot  is  nothing  more  than  a 
Numerically  Controlled  (NC)  machine  (8:57).  Sensors  allow  a 
robot's  actions  to  be  determined  based  upon  the  robot's 
sensory  interpretation  or:  the  world. 
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Before  a  robot  can  move  about  and  perform  any  function, 
it  has  to  sense  its  surroundings.  This  information  will 
allow  it  to  compute  a  clear  path  of  travel  and  prevent  it 
from  bumping  into  obstacles. 

There  are  numerous  types  of  sensors  commercially 
available  today  for  object  detection  and  identification. 
These  sensors  range  from  the  simplest  contact  switch  to  the 
most  complex  vision  systems.  Yet  each  sensor  has  its  own 
limitations. 

For  example,  a  microswitch  can  be  used  to  detect 
whether  or  not  an  object  has  made  contact  with  the  robot. 
However,  it  can  not  tell  how  much  pressure  is  on  the  object 
nor  the  maximum  aroor.nt  of  pressure  that  can  be  tolerated.  A 
fragile  item  such  as  a  flower  might  be  crushed  by  a  robot 
hand  that  lacks  very  low  pressure  touch  sensors. 

The  sensing  of  position  can  be  simulated  through 
optical  devices  (9:71).  The  use  of  photo  emitters  and 
receptors  can  measure  intensity  of  light  as  well  as  touch. 
Another  method  of  simulating  touch  is  through  membrane 
contact  surfaces.  Many  of  these  membrane  sheets  form  an 
array  of  switches.  The  greater  the  number  of  switches  used, 
the  better  the  resolution  will  be.  However,  increasing  the 
number  of  sensors  means  an  increased  amount  of  data  which 
requires  much  more  computing  time  (10:73).  This  holds  true 
for  sensors  in  any  domain  and  not  just  touch  sensors. 


The  sensors  discussed  thus  far  will  only  give  the  robot 
information  about  its  immediate  surroundings.  If  the  robot 
is  to  maneuver  around  in  some  unknown  environment  then  it 
must  also  have  access  to  sensory  information  about  objects 
at  much  greater  distances.  What  is  required  is  some  form  of 
vision. 

Robotic  Vision 

Moravec  sized  up  the  state  of  the  art  in  robotic  vision 
by  saying,  "There's  a  handful  of  techniques  for  robot  vision 
that  sort  of  work,  but  none  that  works  spectacularly  well. 
We're  U11  still  groping  in  the  dark  (11:73)."  As  robotic 
vision  goes,  so  goes  mobile  robotics. 

Jarvis  (12)  points  out  that  the  human  visual  system 
uses  many  techniques  to  extract  range  information  about 
the  objects  in  the  field  of  view  and  which  may  be  used  by 
robots.  These  include;  changes  in  brightness  level, 
binocular  convergence  (the  inward  pointing  of  the  eyeballs 
which  is  inversely  proportional  to  the  range  of  the 
object),  stereo  disparity  (the  closer  the  object  the 
greater  the  disparity),  vertical  position  in  the  visual 
field  (closer  objects  are  usually  lower  in  the  field  of 
view),  diminution  of  size  with  distance,  occlusion  clues  and 
outline  continuity  (complete  objects  look  closer  than 
partially  obscured  ones). 


Range  and  Direction  Techniques 
The  principal  range  with  direction  vision  techniques 
used  by  robots  are  triangulation,  surface  orientation  from 
image  brightness,  stereo  disparity  and  binocular 
convergence,  ultrasonic  sonar,  radar,  and  laser  time-of- 
f light  (12). 


Triangulation 

Triangulation  techniques  use  a  narrow  beam  of  light  and 
a  camera  that  is  physically  displaced  from  the  light  beam 
source.  The  camera  tracks  the  light  beam  as  it  is  swept 
across  the  field  of  view.  The  azimuth  and  elevation 
(pointing  direction)  of  the  camera  and  light  beam  are 
recorded  during  the  scan.  Using  Euclidean  geometry,  a  three 
dimensional  picture  (3-D)  is  generated  from  the  camera's  2-D 
picture  and  the  direction  information.  Since  the  camera  is 
physically  displaced  from  the  light  beam,  it  can  see  points 
in  the  scene  that  the  light  beam  can  not  and  vice  versa. 
This  lack  of  common  origin  causes  problems  for  scene 
interpretation  and  is  only  used  in  controlled  situations. 

Controlled  Lighting 

Surface  orientation  from  scene  brightness  gives  range 
information  indirectly.  Using  high  contrast  controlled 
lighting,  edges  of  objects  are  defined  by  looking  for  a 
change  in  brightness  between  adjacent  pixels  (picture 
elements).  Keller  (13:123)  indicates  that  the  generally 


accepted  minimum  pixel  count  for  robotic  vision  purposes  is 
256  horizontal  by  256  vertical  with  256  levels  of  brightness 
(grey  scale).  This  pixel  brightness  comparison  creates  a 
tremendous  computational  burden  on  a  robot  and  is  normally 
performed  remotely  by  special  computers.  Once  the  edges  of 
an  object  are  defined,  the  relative  range  of  the  object  is 
estimated  using  occlusion  clues  and  outline  continuity 
rules. 

Stereo  Vision 

The  stereo  disparity  and  binocular  convergence  combine 
the  techniques  of  triangulation  and  edge  detaction  in  that 
the  pixels  of  two  physically  separated  cameras  are  matched. 
The  angular  position  in  the  field  of  view  of  each  camera  for 
a  specific  common  point  will  be  different  from  one  camera  to 
the  other  because  of  the  physical  separation  of  the  cameras. 
The  difference  between  the  angular  position  of  the  two  views 
is  equivalent  to  the  amount  of  inward  turning  of  the  eyes  in 
the  human  visual  system  which  is  inversely  proportional  to 
the  range  of  the  common  point.  The  greatest  problem  with 
this  technique  is  being  able  to  distinguish  which  pixel  of 
one  camera  is  the  same  point  in  the  other  camera  (13:123). 
This  problem  can  be  compounded  when  the  picture  being 
processed  has  a  periodic  pattern  such  as  a  brick  wall  or  a 
fence  with  a  vertical  or  horizontal  pattern.  In  such 
situations,  the  computer  that  is  correlating  points  between 
pictures  gets  confused  and  usually  can't  solve  the  problem. 


Stereo  Convergence  in  an  IC 


Iverson  (14)  describes  an  integrated  circuit  (IC)  that 
has  23  pairs  of  light  detectors  lined  up  in  two  rows  with 
each  having  its  own  iricrolens  bonded  directly  to  the  chip 
carrier.  The  TC  is  placed  behind  the  lens  of  a  single 
camera  and  is  capable  of  doing  edge  detection  and  range 
calculations  using  stereo  disparity  and  binocular 
convergence  techniques  passively  without  using  special 
lighting*.  Such  an  equipped  camera  system  does  not  suffer 
from  most  of  the  problems  of  the  previous  paragraphs  and 
holds  great  promise  for  freeing  mobiJa  robots  from  the  lab. 
The  accuracy  of  the  system  depends  on  the  distance  to  the 
object  being  sensed  and  the  focal  length  of  the  imaging  lens 
used  on  the  camera. 


Range  from  Time-of-Flight 

Ultrasonic  sonar,  radar,  and  laser  time-of-f 1 ight 
techniques  rely  on  the  propagation  of  energy  (sound, 
electromagnetic,  and  light)  through  air  to  an  object  that 
reflects  the  energy  back.  The  time  to  make  the  trip  is 
proportional  to  the  range  of  the  reflecting  object.  The 
problem  with  these  techniques  is  that  the  power  of  the 
return  energy  received  by  the  sensor  decreases  at  a  rate 
proportional  to  the  range  to  the  fourth  power.  Hence,  an 
increase  in  range  coverage  requires  a  tremendous  increase  in 
transmitted  power  which  may  be  beyond  safe  levels. 
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Ultrasonic  Sonar 


Laser  light  and  television  systems  can  provide  distance 
information  and  much  more.  However,  these  systems  tend  to 
be  very  complex  and  expensive  (10:180).  A  low  cost 
alternative  approach  is  to  use  an  ultrasonic  device  (like 
the  ones  found  on  the  Polaroid  Land  cameras.) 

A  high  frequency  "chirp"  is  transmitted  from  the  sonar 
device.  A  counter  keeps  track  of  the  time  between  the 
instant  the  signal  is  transmitted  and  the  time  the  signal 
returns.  The  Polaroid  sensor  for  example  has  a  range  of  0.9 
feet  to  35.0  feet  (15:15).  Although  this  sensor  can  provide 
the  robot  with  limited  information  about  its  surroundings, 
the  object's  inclination  and  geometry  could  affect  the 
quality  of  the  returned  signal.  Better  results  can  be 
obtained  with  multiple  ultrasonic  sensors  mounted  on  the 
robot  in  different  directions  (10:183). 

Owen  (2)  showed  that  mobile  robot  obstacle  avoidance 
was  possible  by  reducing  the  amount  of  information  to  be 
processed  by  the  use  of  multiple  ultrasonic  sonar 
sensors  giving  the  range  to  the  closest  obstacle  at  known 
directions.  He  also  showed  that  a  crude  map  of  the  robot's 
environment  could  be  made  from  robot  position  and  sonar 
information. 

Jarvis  (12:135)  indicates  that  obstacle  detection  and 
robot  navigation  are  good  applications  for  ultrasonic  sonar 
because  of  their  low  cost  and  ease  of  use. 
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Radar  range  finders  have  given  way  to  laser  time-cf- 
flight  range  finders  since  the  beam  of  the  laser  is  very 
narrow  and  can  be  precisely  controlled.  Since  the  path 
traveled  to  the  object  is  done  at  the  speed  of  light#  the 
supporting  instrumentation  must  be  capable  of  30  nanosecond 
resolution  for  range  accuracy  of  1  centimeter.  This 
requirement  pushes  the  present  limits  of  economical 
electronics.  Jarvis  (16)  feels  that  such  laser  range 
finders  used  with  standard  single  camera  2-D  vision  systems 
could  yield  sufficient  quality  for  robotic  scene  analysis. 

Robot  Software 

— —  -  i  ■■  ■ 

Robotics  research#  development#  and  applications 
require  advanced  engineering  and  technical  skills  (8:55). 
The  key  element  here  is  computer  control  via  software.  The 
sophistication  of  the  robot's  software  will  vary  directly 
with  the  complexity  of  the  task  to  be  performed.  What 
distinguishes  robot  software  from  other  software  is  the 
robot's  interaction  with  the  real  world.  The  software  must 
account  for  numerous  possibilities  and  outcomes  of 
situations . 

Flexibility  thru  Resources 

Computer  software  enables  a  robot  to  perform  a  myriad 
of  tasks.  However#  there  is  no  standard  or  universal  robot 
programming  language.  For  every  unique  robot#  there  is  a 
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unique  set  of  instructions  to  control  that  robot. 

Flexibility  in  robot  programming  is  found  in  the  basic 
operations  the  robot  can  perform  as  determined  by  its 
resources.  A  robot's  resources  are: 

1  algorithms; 

2  data; 

3  computational  power; 

4  storage  capacity; 

5  commandable  devices  (motors,  relays,  servos, 

wheels,  arms,  end  effectors,  and  other  special  purpose 

devices) ; 

6  sensors  (gathers  or  verifies  data  on  system 
operation  or  the  environment); 

7  and  master/slave  connections  with  other 
robots,  machines,  systems,  computers,  and/or  humans. 

Levels  of  Robot  Programming 

There  are  three  distinct  levels  of  robot  programming: 
system,  task,  and  operator  (8:55).  System  programming 
provides  the  lowest  level  of  routines  to  control  robot 
resources  and  interfaces  between  resources.  Task  level 
programming  is  done  as  high  level  calls  of  the  lower  system 
level  routines.  Operator  programming  may  consist  of  loading 
programs  into  the  robot,  adding  required  or  optional  data, 
turning  the  robot  on  or  off,  teaching  the  robot  a  sequence 
of  operations  to  be  remembered  for  later  use  by  means  of  a 
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"teach  box"  or  "pendant",  or  physically  leading  the  robot  by 
the  hand  thru  the  required  operation  while  having  the  robot 
memorize  the  sequence  for  later  use.  Each  level  of  robot 
programming  requires  a  different  level  of  skill  and 
understanding. 

Basic  Functions  Required 

The  set  of  required  basic  functions  for  a  robot  are 
(8:57)  : 

1  Computation: 

a.  analytic  geometry  is  most  useful; 

b.  coordinate  representation  and 
transformation; 

c.  vector  operations  (dot  product,  cross 

product, seal ing,  normalization,  and 
linear  operations); 

2  Decision  (conditional  branch  based  on 

processed  sensor  data): 

a.  sign  test  (+,  -,  0); 

b.  relation  (<,  >,  *) ; 

c.  Boolean  (on,  off,  true,  false,  1,  0); 

d.  bit  pattern  given  a  reference  pattern; 

e.  set  operations  (member,  nonmember, 

subset,  empty  set); 

3  Communication  (internal  and  external); 
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Movement; 
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Sensor  data  gathering;  and 
Sensor  data  processing. 


6 

Quality  Software 

Quality  software  development  comes  from  discipline 
in  following  an  established  methodology.  Top  down 
structured  programming  can  produce  software  that  is 
(8:62) : 

1  correct  (hard  to  determine); 

2  reliable  (no  detected  errors); 

3  valid  (meets  specifications  and  is 

suitable  for  the  job); 

4  resilient  (degrades  gracefully  when  things 
go  wrong,  checks  for  errors,  and  provides 
recovery  routines); 

5  usable  (shows  consideration  for  human 

factors  consistent  conventions,  few  if  any 
arbitrary  codes/names,  through  diagnostics 
and  error  messages); 

6  clear  (design  structure  apparent  from 

program  listing,  meaningful  names,  use  of 
well  known  algorithms,  frequent  and 
effective  comments,  modular  structure); 

7  maintainable/modifiable  (a  by-product  of 

clarity,  changes  due  to  detected  errors 
or  system  changes  are  easily 
incorporated) ; 
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8  generalized  (performs  over  a  wide  range 

of  input  values,  modes,  and  use); 

9  portable  (hardware  specific  and  software 
dependent  features  are  isolated  for  easy 
change  to  another  computer  system); 

10  and  is  testable  (step  by  step  testing  is 
possible  due  to  simple  structured 
algorithms) » 

Programming  Guidelines 

The  following  guidelines  for  structured  programming 
provide  a  methodology  tor  program  development  (8:69): 

1  Program  in  small  modules. 

2  Comment  programs  telling  what  and  why 

things  are  done  and  what  assumptions 
exist  if  any. 

3  Don’t  misuse  the  instruction  set  or 
software  language. 

4  Don't  write  self  modifying  programs. 

5  Avoid  complex  statements  -  break  them  up 
into  smaller  parts. 

6  Use  indentation  and  a  format  that  makes 
listings  more  readable. 

7  Avoid  negative  Boolean  logic.  Reversing 
an  if  -  then  clause  allows  dropping  a 
NOT  in  front  of  an  expression. 


8  Use  meaningful  names  for  variables, 
constants,  and  procedures. 

9  Make  modules  that  do  not  interfere  with 

the  code  or  data  of  other  modules. 

10  Uncommented  code  that  works  is  better 

than  commented  code  that  doesn't  work, 
until  it  comes  time  to  modify  the  code. 
Comments  should  clarify.  Clarity  is  its 
own  reward. 

Decision  Making 

A  major  part  of  a  robot  control  system  is  decision 
making.  The  more  decisions  that  can  be  deferred  until  run 
time,  the  better  the  robot  program  can  be  adapted  to 
changing  task  requirements.  There  are  four  kinds  of 
decisions  that  may  be  deferred  until  run  time  (8:74): 

1  What  initial  data  items  are  required. 

2  How  to  allocate  resources. 

3  How  to  coordinateconcur rentprocesses. 

4  Howtohandle  exceptions. 

Deferred  Data  Items 

Determining  deferred  data  items  may  require 
communication  with  an  external  computer  system,  locating  an 
index  mark  or  calibration  jig  for  sensor  alignment,  or  even 
human  interaction  with  the  robot  computer  and/or  sensors. 
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Resource  Allocation 


Resource  allocation  becomes  a  problem  when  two  or  more 
processes  require  the  same  resource.  This  still  may  be 
deferred  past  the  start  of  run  time  to  the  concurrent 
process  coordinator  to  resolve  once  the  resources  are 
requested  during  program  execution. 

The  concurrent  process  coordinator  switches  the 
attention  of  the  central  processor  and  possibly  other  system 
resources  between  processes  by  use  of  a  semaphore  or 
Dijkstra  flag.  In  multiple  processor,  multiple  process, 
and/or  interrupt  driven  robots,  the  use  of  special  hardware 
(or  a  software  instruction  like  the  afore  mentioned  MC68000 
test  and  set  instruction)  may  be  required  to  insure 
resolution  of  resource  allocation  conflicts.  The 
coordinator  must  never  allow  a  situation  to  exist  where  two 
processes  or  processors  have  been  allocated  resources  and 
will  not  release  them  to  another  and  yet  can  not  proceed 
until  a  resource  controlled  by  another  is  obtained.  This  is 
the  classic  deadlock  or  deadly  embrace. 

Exception  Handling 

Exceptions  are  either  predictable  or  unpredictable 
(8:77).  Predictable  exceptions  occur  when  a  verification 
step  returns  false  such  as  a  mobile  robot  not  finding  a 
position  update  marker  as  planned.  Unpredictable  exceptions 
occur  during  well  defined  procedures.  These  are  hardware 
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failures  or  the  selection  of  a  software  path  that  was  not 
tested  and  has  an  error.  Software  failures  are  best  treated 
with  preventive  measures  earlier  discussed.  Hardware 
redundancy#  parity  bits,  checksums,  cyclic  redundancy  check 
characters  (CRC),  message  sequence  numbers,  send  and  receive 
addresses,  and  error  detection/correction  codes  are  possible 
ways  to  decrease  or  handle  unpredictable  exceptions. 

It  may  be  advisable  to  disable  the  robot  on  certain 
exceptions.  Time-outs  may  be  implemented  in  hardware  or 
software  to  disable  a  robot  if  a  "keep  alive"  signal  is  not 
updated  every  so  often.  If  disabled  by  a  time-out,  the 
robot  should  only  be  restarted  by  a  special  manual  or 
automatic  procedure.  Robots  should  have  deadman  and  panic 
switches  to  protect  both  humans  and  equipment. 

High  Level  Language  Programming 
Programming  should  be  done  at  the  highest  level  of 
language  possible  consistent  with  the  needs  of  efficiency 
and  clarity.  It  is  imperative  that  task  level  programming 
discussed  earlier  be  done  in  an  interpretive  or 
hal table/restar table  language  so  as  to  be  able  to  debug 
programs  while  running  on  the  robot.  Software  facilities 
required  for  program  debugging  include  utilities  to: 

1  Up-load/down-load  code  from  an  off-line 
(off-robot)  software  development  system 
to  the  robot; 
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2  Relocate  code  in  memory; 

3  Link  modules; 

4  Allow  Symbolic  debugging; 

5  Set/reset  breakpoints;  and 

6  Single  step  program  execution. 

Programming  languages  used  should  conform  to  the 

structured  programming  guidelines.  Possible  languages 
include: 

1  Assembly  language  in  the  processor's 
instruction  set; 

2  The  C  programming  language; 

3  Structured  FORTRAN; 

4  PASCAL; 

5  ADA; 

6  LISP; 

7  PROLOG;  and 

8  FORTH. 

Many  other  good  languages  exist,  but  the  mentioned 
languages  have  virtues  which  make  them  desirable  for 
program  development  and  debugging.  There  are  also  many 
robot  specific  languages  but  are  usually  processor  and 
hardware  dependent.  These  can,  however,  be  used  as  a  basis 
for  developing  new  robot  languages  if  concern  for  quality 
software  design  is  maintained. 

A  quality  editor/word  processor  softwa'*  •  package  is  a 
must  for  software  development,  documentation,  and  reporting. 
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Sensory  Data  Processing 

The  only  arguments  against  the  use  of  a  particular 
sensor  are  its  cost  in  terms  of  software  overhead,  required 
computing  power  support,  time  to  process  the  sensor's  data, 
fit  on  robot,  weight,  robot  capability  without  the  sensor 
(which  may  be  an  argument  for  the  sensor),  external 
equipment/personnel  support  required  to  use  this  sensor,  and 
money  (8:25). 

The  major  robot  sensor  categories  are: 

1  Proprioceptors  (sense  position); 

2  Touch; 

3  Proximity; 

4  Range; 

5  Force; 

6  Movement; 

7  and  Vision  (really  only  a  subset  of  the 

vision  that  humans  experience). 

Sensor  Error 

Sensor  errors  may  be  due  to  changes  in  sensor 
characteristics  over  time,  quantization  error,  or  sensor 
susceptibility  to  noise  of  some  form.  Filtering  techniques 
may  therefore  have  to  be  incorporated  to  compensate  for  or 
minimize  the  ..  Tfects  of  noise. 

Crowley  has  proposed  a  computational  paradigm  or  model 
for  three  dimensional  scene  analysis  (17).  He  explains  that 
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multiple  sensor  systems  may  be  used  to  gather  information 
about  a  robot's  environment  and  a  sensor  model  of  the 
environment  developed.  Models  from  many  sensors  are 
combined  to  create  a  combined  or  composite  model  that  can 
change  with  a  dynamic  environment.  This  composite  model  is 
then  used  to  solve  a  mobile  robot's  problem  of  global 
navigation,  local  navigation,  and  position  estimation  (18). 

What  is  a  Robot 

A  robot  is  a  device  that  performs  functions 
normally  ascribed  to  human  beings,  operates  with  what 
appears  to  be  almost  human  intelligence,  or  is  a  mechanism 
guided  by  automatic  controls  (19:744).  Industrial  robots 
generally  consist  of  an  arm  bolted  to  a  platform  with  an 
end  effector  (gripper,  spot  welder,  drill,  or  special 
tool)  affixed  and  which  is  controlled  by  a  computer.  A  robot 
is  distinguished  from  a  Numerically  Controlled  (NC)  machine 
(such  as  an  automatic  lathe)  in  that  a  robot's  actions  are 
determined  by  sensor  feedback  and  not  just  a  sequence  of 
computer  instructions.  Most  mobile  robots  still  remain  in 
research  labs  because  of  the  demanding  requirement  to 
have  some  form  of  vision  to  allow  obstacle  avoidance 
and  object  identification  to  allow  a  solution  to  the 
mobile  robot  navigation  problem.  New  forms  of  vision 
based  on  range  and  direction  information  may  soon  allow 
mobile  robots  to  function  in  environments  previously 
requiring  human  workers. 
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III.  MARRS-1  Design 


Overview 

One  of  the  major  efforts  of  this  thesis  has  been  to 
develop  hardware  and  software  to  control  and  communicate 
with  the  AFIT  MARRS-1  robot.  Additionally,  three  important 
steps  were  taken  to  improve  the  robot.  First,  the  robot  was 
taught  and  run  thru  a  simple  sequence  of  operations  to 
identify  the  errors  involved  with  moving  the  robot  in 
various  directions.  Second,  the  robot  was  then  modified  to 
make  optimum  use  of  its  sensors  and  to  eliminate  where 
possible  the  errors  identified  in  the  first  step.  And 
thirdly,  a  software  development  system  was  established  to 
aid  in  the  design,  testing,  and  maintenance  of  the  robot  and 
its  subsystems. 

After  a  period  of  hardware  evaluation,  mechanical 
redesign,  fabrication,  and  electronics  upgradeing  was 
completed,  the  remaining  task  involved  many  iterations  of 
program  development,  testing,  data  analysis,  and  program 
modification  based  on  test  results. 

A  series  of  Robot  Integrated  Operation  Tests  (RIOTs) 
were  then  performed  that  have  great  value  in  many  key  areas. 
The  tests  establish  a  benchmark  that  can  be  used  as  a  point 
of  reference  for  further  work.  In  addition,  if  the  errors 
in  a  particular  device  are  consistently  similar  to  previous 
test  cases,  then  error  compensation  is  relatively  simple. 


If  on  the  other  hand,  the  errors  are  random,  then  much  more 
emphasis  must  be  placed  on  multiple  sensor  feedback.  The 
tests  may  he  expanded  as  the  mobile  robot  project  continues 
and  should  be  updated  as  automated  tools  are  made  available 
(or  developed).  The  object iv?  ->?.  the  tests  should  not  only 
be  to  demonstrate  a  capability  but  to  also  identify 
deficiencies  that  may  exist  in  the  robot  and  to  what  extent. 
Familiarization  with  the  A FIT  HERO-1  Robot 

Before  a  prospectus  for  this  thesis  could  be  submitted, 
some  familiarity  with  the  AFIT  HERO-1  robot  built  by  Lt. 
Owen  was  necessary  (see  figure  3.1).  What  could  the  robot 
do?  What  would  be  the  next  step  in  developing  a  truly 
autonomous  mobile  robot?  Could  the  robot  be  made 
autonomous?  The  answers  to  these  questions  would  be  the 
driving  force  in  determining  the  direction  of  this  thesis. 


Figure  3.1 


AFIT  HERO-1  Robot  Built  by  Lt.  Owen 


What  Could  the  AFIT  HERO-1  Robot  Do? 


The  AFIT  HERO-1  robot  had  an  arm  with  145  angular 
degrees  of  movement,  a  wrist  with  two  axis  >f  motion,  and  a 
two  claw  gripper.  Locomotion  was  developed  from  a  tricycle 
gear  wheel  configuration  with  the  front  wheel  the  only  wheel 
actively  propelled  and  steered  plus  or  minus  90  degrees  from 
center.  The  drive  of  the  front  wheel  had  three  speeds  in 
both  the  forward  and  reverse  directions.  There  were  two 
le- els  to  the  body  with  the  top  level  being  able  to  turn 
plus  or  minus  178  degrees.  Additionally,  the  robot  had  a 
Votrax  SC01  speech  synthesizer,  a  single  three  degree 
beamwidth  ultrasonic  sonar  range  finder  in  its  head  with 
separate  transmit  and  receive  transducers,  a  calendar  with 
clock,  a  256  level  light  intensity  sensor,  a  256  level  sound 
volume  sensor,  and  an  ultrasonic  motion  detector.  Lt  Owen 
had  added  a  laser  barcode  reader  and  15  Polaroid  type 
ultrasonic  sonar  range  finder  transducers.  The  robot  had  an 
impressive  list  of  resources  for  mobile  robotics  research, 
could  make  crude  maps  of  its  environment,  and  move  about 
randomly  without  hitting  obstacles  under  self  control.  Yet, 
the  AFIT  HERO-1  robot  had  some  major  deficiencies. 

Deficiency  Identification 

Initial  investigation  into  the  opportunities  for 
improving  AFIT's  mobile  robotics  research  revealed  the 
following: 
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The  ability  to  rapidly  develop  and  debug  software  was 
seen  as  one  of  the  most  important  improvements  necessary  for 
the  AFIT  mobile  robotics  research  environment. 

The  front  wheel  design  of  the  HEP.0-1  robot  needed  to  be 
improved  since  the  steering  gearbox  bearings  wore 
excessively  over  a  short  period  of  robot  use.  The  bearing 
wear  and  the  additional  weight  from  the  laser  barcode  reader 
distributed  high  in  the  robot's  body  caused  the  robot  to  be 
mechanically  noncompl iant ,  nonrepea table,  and  top  heavy 
(unstable).  Motion  of  the  robot  now  became  random  since 
commands  to  the  stepper  motor  controlling  the  steering  of 
the  front  wheel,  were  sent  from  the  robot's  computer  and 
assumed  to  have  been  obeyed,  when  in  fact,  it  was  very  easy 
for  small  impeding  forces  to  withstand  and  overcome  the 
torque  of  the  steering  stepper  motor.  Thus,  robot  steering 
and  position  estimation  algorithms  were  defeated.  This 
condition  could  have  been  avoided  in  part  by  determining  the 
position  of  the  steering  shaft  explicitly  with  a  sensor  and 
implementing  a  closed  loop  feedback  system. 

The  AFIT  HERO-1  robot  Polaroid  ranging  system  was  not 
as  fast  in  gathering  data  as  it  could  have  been  since  only 
one  transducers  could  be  used  at  a  time. 

The  creation  of  a  sonar  range  map  from  data  gathered  by 
the  AFIT  HERO-1  robot  required  undesirable  human 
intervention  to: 

1.  Determine  the  robot's  heading  for  each 
sonar  sample  period. 
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2.  Provide  a  robot  position  correction 
factor  for  each  sonar  reading.  The  barcode  that  was  read  by 
the  robot  was  taped  to  the  floor  and  was  from  one  and  a  half 
to  two  feet  away  from  the  center  of  the  robot.  Thus, 
position  of  the  robot  was  loosely  based  on  the  number 
appearing  on  the  barcode.  The  position  of  objects  in  the 
test  environment  was  based  on  data  from  the  sonar  system 
which  was  not  firmly  referenced  to  the  barcode  taped  to  the 
floor. 

3.  Draw  the  two  dimensional  (birds  eye 
view)  map  post  mission  in  a  form  useful  to  humans  from  sonar 
data,  barcode  position  information,  and  notes  taken  by  human 
observers  during  the  mission  (or  test  run). 

The  AFIT  HERO-1  robot  was  then  redesigned,  rebuilt,  and 
renamed  the  AFIT  Mobile  Autonomous  Robot  Research  System 
(MARRS-1)  and  is  shown  in  figure  3.2. 

System  Level  Description 

The  overall  system  structure  for  control  of  MARRS-1  is 
shown  in  figure  3.3.  Note  that  the  vertically  integrated 
control  structure  from  the  external  computer  to  the  Nav 
Computer  to  the  Drive  computer  is  only  one  of  many 
configurations  possible.  The  RlOTs  of  chapter  5  used  this 
structure  minus  the  control  shown  from  the  Nav  Computer  to 
the  Drive  Computer. 


Figure  3.3  MARRS-l  Control  Structure 
Design  Philosophy 

Several  key  factors  have  molded  the  design  of  MARRS-l 
into  its  firal  form.  The  first  and  foremost  important 
design  crite  :ia  was:  Never  discard  a  capability,  only  add  to 
or  enhance  the  original  design.  The  second  design  criteria 
was  to  treat  all  system  components  and  sub-elements  as 
black  boxes  with  standard  interfaces  (in  this  case 
serial  RS-232).  Modularity  and  expansion  was  always  kept 
in  mind  as  systems  were  designed  and  developed.  Hardware 
implementation  of  a  given  task  was  always  chosen  over 
software  (if  a  trade-off  existed)  to  alleviate  unnecessary 
burdens  from  the  CPU. 


Mechanical  Design 

The  MARRS -1  robot  is  29  and  a  naif  inches  high,  21  and 
a  half  inches  in  diameter  at  its  widest  point,  has  two  decks 
with  12  sides  each,  an  improved  tricycle  configuration  with 
a  front  wheel  only  drive  system,  separate  shafts  for  each 
rear  wheel,  and  a  low  slung  8  gel  cell  battery  compartment. 
It  has  retained  all  the  features  of  the  HERO-1  robot  except 
those  modified  to  improve  performance  and  the  arm.  The  arm 
was  intentionally  left  off  MARRS-1  since  the  intent  is  to 
work  toward  solving  mobile  autonomous  robot  problems  and  not 
fixed  arm  problems.  Once  a  good  autonomous  mobile  platform 
has  been  developed,  it  will  become  desirable  to  add  a 
quality  robot  arm  with  special  end  effectors.  The  twelve 
side  design  grew  out  of  an  attempt  to  have  symmetrical  sonar 
coverage  at  two  levels  erroneously  thinking  that  the 
beamwidth  of  the  Polaroid  sonar  transducers  was  30  degrees 
when  they  are  more  like  10  to  15  degrees.  Tho  twelve  side 
design  impact  on  the  sonar  system  will  be  discussed  later. 

Drive  Computer 

The  original  HERO-1  contained  a  MC6808  computer  system 
with  no  RS-232  serial  capabilities.  The  Virtual 
Devices  Inc.  MENOS-1  MC6801  upgrade  CPU  board  enhanced  the 
HERO-1  and  gave  it  RS-232  capability  (at  300  baud  however) 
and  tremendous  new  programming  possibilities.  The  MENOS-1 
ROM  was  modified  to  support  9600  baud  rate  communications 
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(see  Appendix  E).  It  is  now  possible  to  program  the  Drive 
Computer  in  the  C  language,  in  Virtual  Devices  tokenized 
Vamp  language,  in  HERO-1  learn  mode  (teach  pendant),  in 
HERO-1  Robot  language,  and  in  €801  Assembly  language  (a 
superset  of  the  6800  family  with  internal  16  bit 
operations).  The  Drive  Computer  (Menos  I  upgraded  HERO-1 
computer)  is  described  in  Virtual  Device's  Menos  I  user's 
manual.  Virtual  Devices  Robo  C  user's  manual,  Heathkit's 
HERO-1  documentation,  and  in  Appendix  E. 

Navigation  Computer 

The  Navigation  Computer  is  the  keystone  of  MARRS-1.  It 
controls  both  the  Optical  Shaft  Encoder  Subsystem  and  the 
Sonar  Subsystem. 

Serial  RS  232  communication  links  are  provided  from  the 
Nav  Computer  to  both  the  Drive  Computer  and  an  external 
computer.  Programs  can  now  be  cross  assembled  and  down¬ 
loaded  from  an  external  computer  via  serial  ports  to  either 
the  Nav  or  Drive  computers  on  the  MARRS-1  robot.  In 
addition  a  third  serial  interface  connects  the  Nav  Computer 
to  a  laser  3  of  9  barcode  reader  enabling  MARRS-1  to  run 
software  developed  by  Lt  Owen.  However,  the  laser  barcode 
reader  was  not  used  for  the  Robot  Integrated  Operation  Tests 
(RIOTs)  (chapters  IV  and  V). 
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Nav  Computer  Hardware 

The  digital  portion  of  the  Nav  Computer  is  centered 
around  Motorola  6800  family  devices  (see  Appendices  P  and 
G).  The  operating  system  fits  entirely  on  an  8K  ROM  with 
room  to  spare.  An  additional  8K  ROM  is  located  in  parallel 
with  the  base  page  8K  RAM.  System  initialization  software 
and  page  select  circuitry  load  into  the  base  page  8K  RAM  the 
contents  of  the  base  page  8K  ROM  after  any  hardware  reset  or 
call  of  the  subroutine  laheled  ROMLAYRAM.  A  full  contiguous 
48K  of  static  RAM  exists  on  board.  Input  and  output 
devices  are  memory  mapped  as  is  the  case  with  all  Motorola 
68XX,  68XXX  devices. 

Nav  Computer  Software 

MARRSBUG  (see  Appendix  A  and  D)  is  an  interrupt 
driven,  heavily  modified  serial  version  of  Motorola's 
MIKBUG  and  American  Microsystem's  PROTO  operating  systems. 
Data  from  the  Nav  Computer's  Sonar  and  Optical  Shaft  Encoder 
subsystems  is  constantly  being  updated  by  a  maskable 
hardware  interrupt  handler  and  made  available  to  any  user 
programs  that  run  on  the  Navigation  Computer.  Hence,  the 
net  effect  of  the  MARRSBUG  interrupt  driven  data 
acquisition  system  is  transparent  to  the  user.  The 
operating  system  is  flexible  enough  to  allow  changes  to 
vectors  and  constants  which  are  loaded  into  system  RAM  on 
power  up.  An  important  feature  of  MARRSBUG  is  that  on 
power  up,  the  system  performs  a  RAM  check  to  verify  where 


the  largest  contiguous  block  of  good  RAM  is  located  and 
updates  the  system  RAM  vectors  appropriately.  Additionally, 
numerous  callable  subroutines,  software  interrupts,  and 
system  utilities  exist  within  the  ROMs  to  aid  the 
development  of  application  programs  for  the  Nav  Computer 
(see  Appendices  A,B,D,  and  N). 

Optical  Shaft  Encoder  (OSE)  Subsystem 

The  OSE  Subsystem  is  perhaps  the  most  important  of  the 
two  Nav  Computer  subsystems  (although  one  subsystem  cannot 
perform  to  its  utmost  without  the  other).  A  1200  count  per 
revolution  OSE  is  placed  on  the  shaft  of  each  rear  wheel 
(two  independent  shafts)  and  on  the  front  wheel  steering 
shaft.  By  maintaining  the  distance  traveled  by  each 
rear  wheel,  both  heading  and  position  information 
(relative  to  initial  heading  and  position)  are  readily 
obtainable  by  calculating  simple  trigonometric  equations 
(see  Chapter  V).  The  instantaneous  steering  position  of  the 
front  wheel  is  maintained  by  subtracting  the  clockwise  and 
counterclockwise  counts  of  the  front  wheel  steering  OSE. 

Cumulative  counts  are  required  to  integrate  this  sensor 
data  into  the  Navigation  Computer.  Thus,  an 
incremental  encoder  was  chosen.  The  Datametrics  K3 
encoder  (see  Appendix  K)  provides  both  incremental 
pulses  and  two  channels  which  are  90  degrees  out  of  phase 
with  each  other.  With  the  proper  interface  circuJtry, 
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this  phase  relationship  enables  the  robot  to  distinguish 
between  forward  and  reverse  motion  of  each  rear  wheel. 

A  Motorola  6840  Programable  Timer/Counter  chip,  in 
conjunction  with  a  DM9602  dual  precision  one  shot 
multivibrator,  provides  an  optimum  circuit  to  interface  each 
OSE  with  the  CPU  (see  Appendix  G,  Figure  G.15).  By  using 
a  6840  as  a  counter  (of  which  there  are  three  16  bit  down 
counters  on  each  chip)  the  burden  of  keeping  track  of 
continuously  rotating  wheels  is  removed  from  the  CPU. 

The  DM9602's  determine  wheel  direction  (forwards  or 
backwards).  This  is  accomplished  by  testing  for  a  low 
signal  on  one  OSE  channel  and  a  negative  transition 
on  the  other  OSE  channel.  The  6840's  act  as  divide  by 
64  counters  which  equates  to  one  inch  of  wheel  travel.  When 
this  distance  has  been  reached,  an  interrupt  is 
generated  and  a  variable  counter  in  system  RAM  is 
incremented  (cumulative  counts).  Since  the  6840  is 
programable,  this  divide  by  XX  value  may  be  modified  to  suit 
the  user's  scale  factor  and  precision  needs  (see  chapters  V 
and  VI). 

Ultrasonic  Sonar  Subsystem 

The  AFIT  MARRS-1  robot  utilizes  a  simple  vision 
system  to  aid  in  the  solution  of  the  mobile  robot 
point  to  point  navigation  problem.  The  system  acquires 
range  and  direction  information  from  32  polaroid  sonar 
transducers  attached  to  the  robot's  exterior. 


Figure  3.4  illustrates  the  placement  oC  24  of  these 
transducers  on  tho  robot  as  seen  from  an  overhead  view* 


Figure  3.4  Sonar  Transducer  Locations 

The  robot's  sonar  sensors  are  divided  into  two 
different  groupings  by  physical  location  on  the  robot  or 
into  four  different  groupings  according  to  their  attachment 
to  one  of  four  sonar  range  boards  (Group  A,  B,  C,  or  D). 
The  lower  body  deck  houses  sonar  transducers  labeled  A0,  Al, 
A2,  B0,  Bl,  B2,  C0,  Cl,  C2,  D0,  Dl,  and  D2.  The  upper  body 
deck  is  comprised  of  sonar  transducers  labeled  A4,  A5,  A6, 
B4,  B5,  B6,  C4,  C5,  C6,  D4,  D5,  and  D6.  There  are  an 
additional  eight  transducers  in  the  head  of  the  robot  but 
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are  not  used  in  the  RIOTs  (Chapter  V,  Chapter  VI). 
The  selection  of  these  eight  transducers  is  however 
supported  i ri  the  MARRS-1  operating  system.  The  lower 
and  upper  body  decks  have  12  equal  sides.  Each  side  points 
30  degrees  away  from  its  two  neighbors  on  the  same  deck. 
The  drive  computer  can  rotate  the  upper  deck  plus  or  minus 
178  degrees  by  controlling  a  stepper  motor.  Each  sonar 
transducer  is  electrically  connected  to  one  of  four  sonar 
range  boards  (Sonar  Board  A,  Sonar  Board  B,  Sonar  Board  C, 
and  Sonar  Board  0)  by  means  of  coaxial  cable  to  one  of  32 
dual  inline  package  (DIP)  relays.  Transducer  selection  is 
accomplished  by  energizing  a  DIP  relay. 

Only  a  maximum  of  four  sonar  readings  are  valid 
during  a  sonar  •  sample  period  (one  from  each  sonar  range 
board).  If  multiple  paths  exist  between  a  range 
board  and  its  associated  transducers  then  direction 
information  is  forfeited  and  maximum  detection  range  is 
attenuated.  It  may  be  useful  however  to  energize  more  than 
one  transducer  at  a  time  and  establish  a  minimum  distance 
for  obstacle  avoidance.  In  this  mode  of  operation,  a  full 
360  degree  coverage  can  be  obtained  each  sample  period  if 
the  user  is  willing  to  disregard  the  direction 
information.  Distance  information  can  be  obtained  from 
four  mutually  exclusive  quadrants  with  one  quadrant 
covered  by  esch  range  board  by  turning  MARRS-l's  upper  deck 
15  degrees  clockwise. 


Scan  patterns  may  be  established  to  give  discrete  360 
degree  coverage  (with  individual  readings  corresponding 
to  each  15  degree  segment)  by  selecting  only  one  transducer 
of  six  attached  to  a  range  board.  Range  readings  are  taken 
!rom  one,  two,  three,  or  four  range  boards  during  a  sample 
period  and  then  a  different  combination  of  transducers  are 
selected  during  subsequent  sample  periods  until  receiving 
range  readings  from  all  24  transducers. 

By  carefully  choosing  the  transducers  selected, 
separations  of  90,  120,  or  180  degrees  between  selected 
transducers  may  be  achieved  during  each  sample  period  when 
four,  three,  or  two  range  boards  are  used  during  the 
sample  period  respectively  so  as  to  minimize  the 
possibility  of  'intersonar  interference. 

Software  Development  Support 

An  H89  running  CP/M  was  chosen  to  do  the  cross  assembly 
and  program  development  due  to  the  large  amount  of  software 
supported  by  it  and  the  abundance  of  H89  and  CP/M  systems  at 
AFIT.  A  number  of  cross  assemblers  (running  under  CP/M) 
were  found  for  the  6800  family  of  processors.  Two  of  the 
cross  assemblers  were  even  in  the  Public  Domain.  In 
contrast,  it  was  difficult  to  even  find  a  6800  based  system 
to  do  software  development  work  on  for  the  existing  HERO-1 
computer  let  alone  the  software  tools  such  as  assemblers, 
compilers,  and  editors  to  do  the  job. 


II 1-15 


Most  software  development  efforts  for  MARRS-1  took 
advantage  of  Virtual  Devices  Robo  C  compiler  and  Robo 
Assembler . 

The  next  best  alternative  to  the  nonexistent  universal 
robot  programming  language  was  to  develop  a  library  of  robot 
software  routines.  These  are  generic  in  nature  so  that  they 
may  be  combined  to  form  larger  modules  of  software.  A 
MARRS-1  Nav  Computer  user  manual  is  provided  in  Appendix  N. 
Software  provided  by  Virtual  Devices  for  Menos  I,  Robo  C, 
and  Robo  Assembler  contain  many  excellent  routines  for 
controlling  the  original  HERO-1  resources  and  the  6801 
upgraded  Drive  Computer.  However.,  autonomous  operation  of 
MARRS-1  will  require  integrated  control  of  the  Nav  Computer, 
Drive  Computer,  subsystems,  resources,  and  possibly  sensors 
and  computers  yet  to  be  developed. 


II I -16 


IV.  MARRS-1  System  Integration 


Once  the  MARRS-1  design  was  completed,  a  number  of 
projects  were  tackled  in  order  to  bring  the  robot  to  a  point 
where  it  could  be  tested  as  a  system.  Specifically: 

1.  The  new  two  deck,  twelve  sided  body,  battery 
compartment,  reinforced  front  wheel,  and  rear  wheel 
assemblies  were  fabricated  by  the  AFIT  Shop  Personnel. 

2.  The  robot  was  painted  red  white  and  blue  so  as  to 
create  interest  in  the  goals  of  the  thesis  and  for 
patriotic  impact. 

3.  All  electrical  wiring  for  the  original  HERO-1  was 
replaced  with  Longer  cables  since  the  electronics  were  new 
mounted  on  swing  out  doors  to  allow  ease  of  access  for 
modification  or  maintenance. 

4.  Operation  of  the  robot  with  the  original  HERO-1 
electronics  and  new  wiring  was  verified  before  installing 
the  MENOS-1  6801  upgrade  computer.  It  became  evident  that 
the  modification  to  the  front  wheel  (see  figure  4.1)  had 
made  the  robot's  movements  repeatable  and  compliant  to 
program  command.  On  six  different  test  runs  the  robot  was 
able  to  return  to  the  same  spot  (within  th^ee  inches)  after 
going  over  a  50  foot  figure  eight  course  in  the  HERO-1  learn 
mode. 
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5.  The  MENOS-1  upgrade  was  then  installed  and  tested. 
Proper  operation  of  the  original  HERO-1  electronics  and  the 
new  serial  communication  port  was  verified  by  connecting  the 
robot  to  the  lab  H89  computer.  The  resulting  combination  of 
robot  electronics  was  named  the  Drive  Computer  so  as  to 
distinguish  it  from  the  electronics  yet  to  be  added.  The 
Input/Output  (I/O)  decoding  scheme  for  the  Drive  Computer 
was  extended  (as  shown  in  Appendix  H)  to  allow  further  I/O 
expansion. 

6.  The  Optical  Shaft  Encoder  (OSE)  Subsystem  was 
built,  installed  and  initially  connected  to  the  Drive 
Computer  thru  a  40  pin  connector.  In  spite  of  extreme 
efforts  to  be  careful,  four  glass  encoder  disks  were  cracked 
or  broken  while  trying  to  install  the  OSEs  (Appendix  K)  on 
the  front  wheel  steering  shaft  (see  figure  4.1)  and  the  rear 
wheel  shafts.  The  alignment  of  the  OSEs  took  on  the  order 
of  four  hours  for  each  encoder.  What  is  needed  is  an 
encoder  that  that  is  sealed,  prealigned,  small,  inexpensive, 
and  connects  to  the  shaft  with  a  flexible  linkage. 

7.  The  Nav  Computer  was  wirewrapped  onan  Augat 
prototyping  board  and  hardware/software  debugged  using  a 
Hewlett  Packard  1610A  logic  analyzer.  The  OSE  Subsystem  was 
disconnected  from  the  Drive  Computer  and  connected  instead 
to  the  Nav  Computer  with  the  Sonar  Subsystem.  The  two 
subsystems  conceptually  can  be  used  as  a  crosscheck  against 
each  other  if  a  priori  knowledge  about  an  environment  is 
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given  and  function  optimally  if  the  subsystems  are  connected 
to  the  same  virtual  computer. 

8.  The  Sonar  Subsystem  was  connected  and  debugged  on 
the  Nav  Computer  only  after  proper  operation  of  the  computer 
(CPU,  ROM,  RAM,  and  interrupt  driven  I/O  devices)  was 
verified. 

Sideline  Activities 

Many  side  issues,  projects,  and  activities  consumed 
time  during  the  thesis  and  in  their  own  way  contributed  to 
the  success  of  the  effort.  These  included: 

1.  Participation  in  the  10th  Annual  Dayton 
International  Air  Show  representing  AFIT  with  the  newly 
painted  and  rewired  MARRS-1  robot. 

2.  Taking  MARRS-1  to  the  National  Explorer  Scout 
Fly-In  at  Columbus,  Ohio  (once  again  to  represent  AFIT). 

3.  Television,  radio,  and  newspaper  interviews, 
along  with  presentations  to  public  school  groups,  kept 
MARRS-1  (and  its  creators)  busy  informing  the  public  about 
AFIT  research. 

4.  The  AFIT  Mobile  Robotics  Laboratory  was 
created  during  the  thesis  by  scrounging  for  resources 
necessary  to  do  this  type  of  hardware/software  development 
project.  The  physical  space  of  the  lab  was  absolutely 
essential  for  the  success  of  the  thesis.  The  floor  of  the 
test  area  had  to  be  leveled  by  using  wall  plaster  to  fill 
in  holes  and  depressions. 


5.  Two  other  computer  systems  were  built  during 
the  thesis  effort  to  support  software  and  hardware 
development.  A  Motorola  Exorciser  and  a  6802  based  printer 
controller  card  (previously  developed  for  an  AFIT  project) 
were  the  only  6800  family  computers  in  the  school.  Both 
needed  extensive  modification  and  rehabilitation  to  meet  the 
development  needs  of  the  thesis. 

With  the  robot  hardware  and  software  development 
complete,  a  series  of  Robot  Integrated  Operation  Tests 
(RIOTs)  were  conducted. 

Robot  Integrated  Operation  Test  (RIOT)  Plan 

The  RIOTs  demonstrate  the  ability  of  MARRS-1  to  keep 
track  of  its  own  location  and  map  out  the  environment.  The 
RIOTs  also  identify  anomalies  (if  any)  in  robot  and 
algorithm  operation  while  they  (the  tests)  manipulate  data 
collected  from  both  the  OSE  and  Sonar  subsystems  into  a  form 
useful  for  robot  obstacle  avoidance,  path  planning,  and 
robot  performance  benchmarking. 

Test  Range  Environment 

The  test  range  used  for  the  RIOTs  is  part  of  the  AFIT 
Mobile  Robotics  Laboratory  with  dimensions  of  13  feet  by  25 
feet.  All  doors  to  the  test  range  remain  closed  during  each 
test  run.  Test  conditions  are  broken  into  two  categories; 
tests  without  objects  in  the  test  range  and  tests  with 
two  objects  in  the  test  range  (see  figures  5.1  and  5.2). 
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Object  number  one  is  composed  of  a  large  3*  diameter  2* 
7"  high  cylinder.  Object  number  two  is  a  box  with  the 
following  dimensions:  1*  6.5"  wide,  2'  9.5"  long,  2'  3" 
high.  Both  objects  have  cardboard  material  surfaces.  The 
test  range  floor  is  a  reasonably  flat  tile  surface.  The 
walls  of  the  test  range  are  painted  hardboard.  Some  minor 
protrusions  such  as  door  knobs,  conduit,  and  molding  jut  out 
from  the  surface  of  the  walls.  All  walls  are  assumed  to  be 
flat  surfaces  since  the  0.1  foot  sonar  range  resolution  of 
cannot  accurately  distinguish  these  protrusions. 

MARRS-1  Operating  Modes 

In  order  to  collect  enough  data  to  form  a  map  of  the 
test  range  the  robot  is  operated  in  an  open  loop  mode  and 
moved  throughout  the  test  range.  Two  patterns  of  movement 
will  be  tested;  a  straight  line  path  and  a  zig-zag  pattern. 
The  initial  test  run  location  and  heading  of  the  robot 
should  be  kept  the  same  (in  this  case  X  =*  2  feet,  Y  *  7 
feet)  for  ease  of  setup.  Sight  tubes,  mounted  on  the  robot, 
aide  in  the  initial  positioning  of  the  robot.  The  upper 
level  head  of  the  robot  is  rotated  15  degrees  clockwise  to 
provide  a  360  degree  coverage  from  the  24  ultrasonics 
transducers  with  15  degrees  of  separation  between  each 
transducer.  Additionally,  the  number  of  sonar  transducers 
selecteddir ing  each  cycle  of  the  interrupt  handler  varied 
from  test  to  test.  Table  4.1  lists  sixteen  different  test 
configurations  that  were  used. 
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TEST  # 

OBJECTS 

PATH 

#  SONARS 

SELECTED  PER  PERIOD 

4 

TWO 

STRAIGHT 

2 

PER 

.1 

sec 

5 

TWO 

STRAIGHT 

1 

PER 

.1 

sec 

7 

TWO 

STRAIGHT 

3 

PER 

.1 

sec 

9 

TWO 

STRAIGHT 

4 

PER 

.1 

sec 

10 

TWO 

ZIG  ZAG 

1 

PER 

.1 

sec 

11 

TWO 

ZIG  ZAG 

2 

PER 

.1 

sec 

12 

TWO 

ZIG  ZAG 

3 

PER 

.1 

sec 

13 

TWO 

ZIG  ZAG 

4 

PER 

.1 

sec 

14 

NONE 

ZIG  ZAG 

1 

PER 

.1 

sec 

15 

NONE 

ZIG  ZAG 

2 

PER 

.1 

sec 

16 

NONE 

ZIG  ZAG 

3 

PER 

.1 

sec 

17 

NONE 

ZIG  ZAG 

4 

PER 

.1 

sec 

18 

NONE 

STRAIGHT 

1 

PER 

.1 

sec 

19 

NONE 

STRAIGHT 

2 

PER 

.1 

sec 

20 

NONE 

STRAIGHT 

3 

PER 

.1 

sec 

21 

NONE 

STRAIGHT 

4 

PER 

.1 

sec 

Table 

4.1  RIOT  Configurations 

Support  Equipment 

The  following  equipment  provides  the  necessary  support 
to  conduct  this  test;  the  AFIT  MARRS-1  robot,  Heath  H-89 
computer  with  H-27  8  inch  disk  drive  system.  Modem  720 
communication  program,  and  an  RS-232  cable.  Post  mission 
processing  of  the  collected  data  is  performed  on  a  TRS-80 
(6809  based)  Color  Computer. 

Drive  Computer  Learn  Mode  Programs 

The  learn  mode  programs  shown  in  tables  4.2  and  4.3  run 
in  the  Drive  Computer  and  cause  the  MARRS-1  robot  to  perform 
either  straight  line  motion  or  a  zig-zag  pattern  within  the 
confines  of  the  test  range.  (For  a  more  detailed  discussion 
of  robot  interpreter  commands  the  reader  is  referred  to  the 
Heathkit  Educational  Systems  ET-18  ROBOT  Technical  Manual.) 
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ADDRESS  DATA  HERO-1  ROBOT  LANGUAGE  AND  MEANING 

0400  C3  19  6F  MOTOR  MOVE,  WAIT  ; ABSOLUTE ( IMMEDIATE) 

DRIVE  MOTOR  SELECTED 
FORWARD  $16F 
FAST  GEAR 

0403  8F  00  20  PAUSE  (IMMEDIATE) 

0406  3A  RETURN  TO  EXECUTIVE  (••READY") 


Table  4.2  MARRS-1  Straight  Line  Drive  Computer  Program 


ADDRESS  DATA  HERC-1  ROBOT  LANGUAGE  AND  MEANING 

0400  C3  18  06  MOVE  DRIVE  MOTOR  (HIGH  SPEED)  FORWARD  $06 

0403  CC  18  15  MOVE  DRIVE  MOTOR  (HIGH  SPEED)  FORWARD  $15 

0406  C3  E8  33  TURN  LEFT  TO  POSTION  $33 

0409  CC  18  4E  MOVE  DRIVE  MOTOR  (HIGH  SPEED)  FORWARD  $4E 

040C  C3  E8  49  TURN  STRAIGHT  AHEAD 

040F  CC  18  1C  MOVE  DRIVE  MOTOR  (HIGH  SPEED)  FORWARD  $1C 

0422  C3  E8  64  TURN  RIGHT  TO  POSITION  $64 

0425  CC  18  22  MOVE  DRIVE  MOTOR  (HIGH  SPEED)  FORWARD  $22 
0428  C3  E8  49  TURN  STRAIGHT  AHEAD 

042B  CC  18  12  MOVE  DRIVE  MOTOR  (HIGH  SPEED)  FORWARD  $12 

042E  C3  E8  57  TURN  RIGHT  TO  POSITION  $57 

0431  CC  18  0C  MOVE  DRIVE  MOTOR  (HIGH  SPEED)  FORWARD  $0C 

0434  C3  E8  49  TURN  STRAIGHT  AHEAD 

0437  CC  18  0D  MOVE  DRIVE  MOTOR  (HIGH  SPEED)  FORWARD  $0D 

043A  C3  E8  58  TURN  RIGHT  TO  POSITION  $58 

043D  CC  18  39  MOVE  DRIVE  MOTOR  (HIGH  SPEED)  FORWARD  $39 

0440  C3  E8  49  TURN  STRAIGHT  AHEAD 

0443  CC  18  17  MOVE  DRIVE  MOTOR  (HIGH  SPEED)  FORWARD  $17 

0449  C3  E8  31  TURN  LEFT  TO  POSTION  $31 

044C  CC  18  18  MOVE  DRIVE  MOTOR  (HIGH  SPEED)  FORWARD  $18 

044F  C3  E8  46  TURN  RIGHT  TO  POSITION  $46 

0452  CC  18  00  MOVE  DRIVE  MOTOR  (HIGH  SPEED)  FORWARD  $00 

0455  C3  E8  42  TURN  LEFT  TO  POSTION  $42 

0458  CC  18  25  MOVE  DRIVE  MOTOR  (HIGH  SPEED)  FORWARD  $25 

045B  C3  E8  49  TURN  STRAIGHT  AHEAD 

045E  8F  00  FF  PAUSE 

0461  3A  RETURN  TO  EXECUTIVE  ("READY") 


Table  4.3  MARRS-1  Zig-Zag  Drive  Computer  Program 


Robot  Test  Procedures 


1.  Objects  (if  any)  are  placed  in  the  test  range  with 
their  location  and  orientation  documented. 

2.  Document  and  mark  on  the  floor  the  initial  heading 
and  position  of  the  robot.  Heading  is  normalized  for  the 
program  MAPPER  (Appendix  C)  as  a  value  between  Q  and  1  as 
shown  in  figure  4.2.  The  (X,Y)  location  of  the  robot  is 
represented  in  terras  of  tenth's  of  feet  (resolution  of 
1.2").  The  initial  location  and  all  subsequent  locations 
of  the  robot  are  relative  to  the  mid  point  between  the  two 
rear  wheels.  Both  heading  and  location  are  crucial  in 
conducting  this  test  with  any  accuracy/repeatability  and  are 
required  for  post  mission  processing  of  the  Sonar  and  OSB 
data. 


0'  5'  10'  15'  20' 


Figure  4.2  MAPPER  Heading  Convention 
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3.  Straighten  out  the  front  wheel  and  insure  that  the 

count  at  memory  location  $0026  of  the  Drive  Computer 
contains  tb value  $49.  ($49  is  the  value  for  straight 

forward  steering.) 

4.  Insure  that  the  top  deck  is  rotated  clockwise 
(looking  down  on  robot)  by  15  degrees  and  secured  in  place. 

5.  Put  MARRS-1  in  the  learn  mode  and  maneuver  it 
throughout  the  test  range.  NOTE:  The  Drive  Computer  will 
operate  the  robot  in  an  open  loop  mode  for  the  entire  test, 
i.e.  there  will  be  no  feedback  from  the  Nav  Computer  to  the 
Drive  Computer  as  a  result  of  MARRS-l'r  movements  or  the 
environment. 

6.  After  completion  of  the  learn  mode,  reset  the 
Drive  Computer  and  bring  MARRS-1  back  to  the  marked  starting 
position.  Insure  that  the  front  wheel  is  straight  and 
location  $0026  contains  $49.  With  all  of  this  completed, 
execute  the  learned  program  to  confirm  that  the  robot 
performs  adequately.  If  so,  continue.  If  the  robot  fails 
to  repeat  the  learned  operation,  then  go  back  to  step  2  and 
begin  over  again. 

7.  As  in  step  6,  position  the  robot  at  the  starting 
point.  Now,  upload  the  learned  Drive  Computer  program  to  an 
external  computer  via  the  serial  RS-232  port  and  save. 

8.  Before  executing  the  test  program,  open  a  file 
buffer  on  an  external  computer  connected  to  the  Nav  computer. 

9.  Reset  the  timer  on  Navigation  Computer  to  zero. 


10.  Initialize  the  Extended  Interrupt  Handler  fo  select 
the  number  of  sonars  activated  per  sample  period  ti.e.  one* 
two*  three*  or  four  sonars  selected  during  ?  tenth  of  a 
second  interval)  and  execute  the  Drive  Computer's  learned 
test  program  (Table  4.2  or  4.3). 

11.  After  each  test  run*  insure  that  the  captured  test 
data  is  saved  on  magnetic  media  in  AfCII  format  before 
continuing  on  with  the  next  test  run. 

Data  Collection 

Data  from  each  of  the  subsystems  will  be  gathered  every 
0.1second  via  the  Extended  Interrupt  Handler  (see  Appendix 
D)  and  stored  into  a  temporary  line  buffer  in  the  Navigation 
Computer's  memory  as  follows: 

/time/fw/lwl/lw2/rwl/rw2/A# _ /B| _ /C# _ /D| _ /<CRXLF> 

Where  time  *  tenth's  of  seconds  count  -  2  bytes 
fw  =  front  wheel  direction  -  1  byte 
lwl  «  left  wheel  reverse  counts  -  2  bytes 
lw2  3  left  wheel  forward  counts  -  2  bytes 
rwl  =»  right  wheel  reverse  counts  -  2  bytes 
rw2  =  right  wheel  forward  counts  -  2  bytes 

Table  4.4  RIOT  Raw  Data  Format 

The  buffer  is  then  transmitted  to  an  external  computer  at 
9600  baud  (in  this  case  an  H-89  running  N720  communication 
software).  Buffer  contents  are  then  stored  onto  magnetic 
media  for  post  mission  processing. 
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Test  Data  Usage 


After  completion  of  the  entire  test  all  data  is  then 
transferred  fromthe  H-89  to  the  Color  Computer.  Using 
MAPPER,  a  mapping  algorithm,  (  see  Appendix  C)  the  test  data 
will  be  transformed  into  a  bit  plane  graphics  representation 
of  the  test  range.  Optical  shaft  encoder  readings  determine 
position  and  heading  of  the  robot  relative  to  the  starting 
position  (calculated  with  respect  to  the  center  between  the 
rear  wheels).  Sonar  transducer  readings  provide  range  and 
direction  information  about  the  robots  environment  from  the 
current  robot  position  (with  respect  to  the  center  of  the 
robot).  This  graphics  display  provides  a  good  first  order 
approximation  of  the  robots  environment. 
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V.  MARRS-lIntegrated  Operation  Test  Results 


Minor  Test  Problems 

Three  minor  problems  occurred  during  the  MARRS-1  Robot 
Integrated  Operation  Tests  (RIOTs).  However,  these  three 
anomalies  did  not  remove  the  essence  of  the  tests.  They 
are  minor  and  can  be  overcome.  First,  the  front  wheel 
optical  shaft  encoder  resolution  was  much  greater  than  was 
required.  The  slightest  hint  of  mechanical  vibration  caused 
excessive  jitter  in  the  signal  detected  by  the  photo  head 
assembly.  This  resulted  in  erroneous  accumulation  of 
counts  for  front  wheel  direction.  Fortunately  MARRS-1 
was  operated  in  an  open  loop  mode.  The  mapping 
algorithm,  MAPPER  did  not  require  the  data  from  the 
front  wheel  shaft  encoder.  An  example  of  these  erroneous 
readings  can  be  seen  in  Appendix  0. 

The  second  problem  was  with  the  right  wheel  optical 
shaft  encoder.  In  spite  of  efforts  to  align  the  glass 
encoder  disk,  some  reverse  direction  counts  were  detected 
while  going  forward.  This  error  was  of  no  consequence  since 
all  test  runs  were  designed  for  forward  motion  of  the  robot 
and  the  MAPPER  program  disregarded  the  reverse  counts  from 
the  left  and  right  wheels.  However,  Navigation  algorithms 
in  general  should  take  into  account  any  reverse  counts  of 
either  the  left  or  right  wheels.  For  instance,  a  very  tight 
turn  may  cause  the  wheel  on  the  inside  of  the  turn  to  move 


in  the  reverse  direction.  The  slightly  eccentric  alignment 
of  the  right  wheel  optical  shaft  encoder  causes  erroneous 
reverse  direction  counts  which  may  require  the  construction 
and  installation  of  a  new  shaft. 

The  third  minor  setback  to  the  completion  and  final 
testing  of  MARRS-1  was  the  inadequate  current  capabilities 
of  the  sonar  power  supply.  The  currenv.  surge 
requirements  of  more  than  one  sonar  transducer  activated 
at  once  increased  the  effective  internal  impedance  of 
the  batteries.  This  reduced  the  output  voltage  applied  to 
the  sonar  range  boards  (as  well  as  all  other  subsystems) 
and  hence  maximum  sonar  detection  range  was  reduced  to  3.5 
feet.  An  AC  to  DC  power  supply  was  employed  to  provide 
additional  current  drive  for  the  sonar  subsystem  thus 
extending  the  maximum  reliable  sonar  detection  range  to  7.5 
feet. 

Mapping  Algorithm 

The  program  MAPPER  (see  Appendix  C)  takes  large  amounts 
of  test  data  and  compacts  it  into  an  array  of  256  by  192 
picture  elements  (pixels)  that  can  be  displayed  as  a  map  for 
humans  and/or  used  by  a  computer  for  robot  control.  If  the 
heading  of  the  robot  is  known  at  some  initial  starting 
point,  then  all  other  robot  headings  can  be 
determined  from  the  counts  of  the  left  and  right  optical 
shaft  encoders.  Instantaneous  heading  calculations  may  be 
performed  if  the  initial  heading  and  distances  traveled  by 
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each  rear  wheel  are  known.  The  following  equation 
describes  this  principle  (20:163): 

HB  »  HA  +  (L  -  R)/D  rad  (5.1) 

Where  HB  is  the  current  heading  of  the  robot  in  radians,  HA 
is  some  initial  heading  in  radians,  L  and  R  are  absolute 
distances  traversed  by  each  wheel  starting  from  the  initial 
heading  position,  and  D  is  the  distance  between  the  left 
wheel  and  the  right  wheel.  It  is  interesting  to  point  out 
however,  that  the  initial  heading  is  not  absolutely 
required  since  all  successive  heading  computations  are 
relative  to  the  first  and  so  on.  Naturally  with  a 
digital  device,  a  continuous  sampling  is  impossible. 
Thus  the  traversed  distance  of  each  wheel  is  broken 
up  into  incremental  segments.  The  K-3  shc*t  encoder  has  a 
resolution  of  1200  counts  per  revolution.  MARRS-l's  rear 
wheel  circumference  is  equal  to  18.75".  The  units  used 
in  the  test  were  inches,  thus  it  turned  out  that  64  counts 
on  the  shaft  encoder  equalled  one  inch  of  travel  by  the 
wheel  exactly.  The  effective  resolution  of  the  wheels  now 
becomes  18.75  counts  per  revolution.  Just  how  much 
resolution  do  the  robot's  wheels  need  for  navigation 
and  environmental  mapping?  These  test  results  show  that 
fine  detailed  resolution  may  not  be  required.  However, 
optimum  wheel  count  resolution  has  not  been  considered  here 
and  is  left  as  an  area  for  further  investigation. 


Graphics  Plots 

The  plots  shown  on  the  next  several  pages  are  the 
final  output  from  MAPPER.  There  are  perhaps  several  ways 
of  displaying  the  data  collected  from  each  test  run. 
Figure  5.1  shows  a  layout  of  the  size  of  the  test  range  in 
units  of  feet.  It  was  in  this  benign  environment  that 
half  of  the  test  runs  were  conducted.  Figure  5.2 
identifies  the  location  of  the  two  objects  used  during 
the  other  half.  As  a  comparison,  figures  5.3  and  5.4 
are  taken  from  Lt  Owen's  thesis  and  show  how  he 
accomplished  mapping  from  a  HERO-l(2:VII-6,VlI-7).  A  key 
point  about  Owen's  work  is  that  precise  heading  and 
position  information  was  not  available  for  displaying  the 
relative  position  of  sonar  readings.  The  remaining  graphic 
plots  (figures  5.5  thru  5.20)  are  of  the  Robot  Integrated 
Operation  Tests  (RIOTs)  and  uemonstrate  that  a  robot  can 
create  a  low  resolution  map  of  its  environment  (relative  to 
itself)  using  ultrasonic  sonar  as  a  "vision"  device  while 
keeping  track  of  its  orientation  and  location  from 
wheel  counts.  Each  sonar  reading  is  displayed  as  an  arc  of 
20  degrees  at  the  distance  measured  from  the  center  of  the 
robot  and  plotted  based  on. position  and  heading  information 
determined  from  rear  wheal  optical  shaft  encoder  data.  The 
tests  are  termed  integrated  since  robot  performance  is 
evaluated  based  on  all  systems  working  in  concert. 


V-4 


Figure  5*1  Robot  Integrated  Operation  Test  (RIOT)  Range  Layout 
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Figure  5.2  Location  of  Objects  for  RIOTs  with  Objects 
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Figure  5.5  RIOT  #18:  Straight  One  Sonar  at  a  Time 


1  SONAR/  0.1  SEC  TEST  *  14 


Figure  5.6  RIOT  #1H:  Zig  Zag  One  Sonar  at  a  Time 
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3  SONARS/  0.1  SEC  TEST  «t  20 

Figure  5.9  RIOT  #20:  Straight  Three  Sonars  at  a  Time 
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Figure  5.10  RIOT  #16:  Zig  Zag  Three  Sonars  at  a  Time 
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Figure  5.13  RIOT  #5:  Straight  One  Sonar  at  a  Time 


Figure  5.14  RIOT  #10:  Zig  Zag  One  Sonar  at  a  Time 
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Figure  5 


2  SONARS/  0.1  SEC  TEST  «  4 

.15  RIOT  #4:  Straight  Two  Sonars  at  a  Time 
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Figure  5.16  RIOT  #11:  Zig  Zag  Two  Sonars  at  a  Time 


Discussion  of  RIOT  Results 


Each  plot  from  figures  5.5  thru  5.20  represents  14  to 
20  thousand  eight  bit  words  (bytes)  of  data  like  that  shown 
in  Appendix  0.  The  data  could  have  been  encoded  by  the 
Extended  Interrupt  Handler  (Appendix  B)  and  reduced  by  a 
factor  of  four  to  one,  however,  the  data  reduction  would 
have  cost  increased  processing  time  by  the  MAPPER  program  of 
Appendix  C. 

Figures  5.5  thru  5.20  are  accurate  sonar  environmental 
maps  as  compared  to  those  of  figures  5.3  and  5.4  because  of 
the  accurate  heading  and  position  information  coming  from 
the  shaft  encoders. 

The  new  sonar  maps  show  that  robot  navigation  and 
obstacle  avoidance  in  simple  environments  are  possible  from 
low  resolution  sonar  vision  with  accurate  position 
information. 

Particular  attention  should  be  given  to  figure  5.9. 
This  map  identifies  a  skew  of  the  sonar  map  with  respect  to 
the  test  range  outline.  The  skew  was  a  result  of  having  an 
initial  one  and  a  half  inches  of  right  wheel  tra'’3l  recorded 
In  the  data  (see  start  of  Appendix  0)  when  in  fact  the  right 
wheel  travel  distance  should  have  tracked  the  values 
recorded  for  the  left  wheel  for  straight  motion  (which  was 
the  case  for  all  other  straight  line  motion  RIOTs).  The 
difference  between  the  right  and  left  wheel  counts  was  a 


prepacing  the  robot  for  RIOT  #20.  The  skew  of  figure  5.9  is 
therefore  the  result  of  robot  operator  error.  It  does, 
however,  show  the  effect  of  initial  heading  error  or 
isolated  wheel  slippage  with  respect  to  an  external 
benchmark  reference  system.  Note  that  the  sonar  map  can  be 
accurately  created  without  an  external  reference  since  the 
map  is  always  relative  to  the  robot's  own  internal  heading 
and  position.  Therefore,  the  map  created  by  the  robot  may 
require  a  coordinate  transformation  to  a  global  or  external 
reference. 

Sonar  ranges  greater  than  7.5  feet  were  disreguarded 
for  all  RIOT  plots  since  the  power  supply  problem  attenuated 
the  maximum  reliable  detection  for  the  Sonar  Subsystem. 
Additionally,  stray  sonar  readings  are  seen  in  a  few  plots. 
Sonar  transducer  C2  (figure  3.4)  appears  to  have  a  maximum 
reliable  detection  range  of  about  7  feet  and  hence,  the 
stray  readings  from  C2  were  not  deleted  with  the  7.5  foot 
filter  algorithm  in  the  MAPPER  program. 


VI.  Recommendations  for  Future  Work  on  MARRS-1 


Unlike  some  products  on  the  market  today,  MARRS-1 
was  designed  and  built  with  modularity  and  expansion  in 
mind.  In  addition,  there  are  a  few  minor  flaws  in  the 
original  design  that  can  be  improved.  The  following  are 
just  some  of  the  recommendations  and  suggestions  for 
additional  work  and  enhancements  that  will  some  day 
make  MARRS-1  a  truly  autonomous  vehicle. 

1.  Exercise  the  existing  MARRS-1  robot  to 
identify  the  limit  of  its  usefulness  and  capabilities. 

2.  Transport  the  mapping  algorithm  MAPPER  from 
an  external  computer  to  an  onboard  computer  (either  as  part 
ofthe  Navigation  Computer  interrupt  handler  or  on  another 
computer  which  communicates  to  the  Navigation  Computer  via 
RS-232)  . 

3.  Design,  develop,  and  interface  an  on  board 
compass  (perhaps  using  an  A  to  D  converter  or  absolute 
encoder)  to  provide  MARRS-1  with  instantaneous  heading 
information.  This  sensor  data  could  be  used  as  an 
additional  check  to  verify  data  coming  from  other  subsystems 
and  provide  initial  heading  data  on  power-up. 

4.  Develop  filtering  algorithms  that  provide 
MARRS-1  with  more  accurate  maps  of  its  environment.  Perhaps 
further  characterization  of  the  sensor  subsystems  is 
required  before  this  can  be  accomplished. 


5.  The  entire  front  wheel  assembly  requires  a 
re-design  effort.  The  combined  mass  of  the  yoke  and  the 
drive  motor  puts  too  much  of  a  strain  on  the  small  gear  box 
and  shaft  encoder  disk  mounted  above.  A  larger  frame  gear 
box  with  a  similar  gear  reduction  ratio  is  required  to 
eliminate  false  readings  from  the  shaft  encoder. 

6.  The  MARRS-1  steering  shaft  feedback  uses  a 
high  resolution  incremental  encoder  to  do  a  low  resolution 
absolute  encoder's  job.  A  low  resolution  absolute  encoder 
connected  to  the  steering  shaft  by  a  flexible  link  will 
provide  accurate  information  about  the  direction  of  the 
front  wheel  without  excessive  software/hardware  overhead. 

7.  A  better  power  supply  for  the  sonar  subsystem 
is  required. 

8.  Integrate  the  electronics  developed  for  the 
MARRS-1  robot  structure  on  a  larger  heavier  frame:  a  fork 
lift,  a  golf  cart,  or  perhaps  a  rugged  all-*tarrain  vehicle 
used  by  the  U.S.  ARMY  or  coal  mine  companies. 

9.  Integrate  Captain  Glenn  Monaghan's  robot 
task  planning  thesis  (AFIT/ENG/84D-47)  with  theMARRS-1. 

10.  Investigate  the  advantages/disadvantages  of 
three  wheel,  four  wheel,  and  tracked  mobility  configurations 
along  with  different  drive  and  steering  control  systems  as 
they  apply  to  the  mobile  autonomous  robot  problem. 


Yet  Another  Computer  for  MARRS-1 

The  next  logical  progression  of  MARRS-1  is  to  provide 
another  computer  which  will  control  the  functions  of  all 
subordinate  computer  systems.  Its  function  would  be  much 
like  that  of  a  computer  operating  system  only  it  would 
perform  path  planning  based  on  sensory  information  fed  to  it 
from  its  subordinate  systems  and  from  requirements  passed  to 
it  by  an  external  computer  data  link.  An  onboard  MC6809 
based  Radio  Shack  Color  Computer  would  be  the  perfect 
addition  to  the  droid  ensemble.  By  adding  a  disk  controller 
and  disk  drives,  the  robot  becomes  a  stand  alone 
hardware/software  development  device  (minus  a  keyboard  and 
monitor  which  may  be  connected  remotely,  or  as  needed). 

There  are  several  reasons  for  choosing  the  MC6809  or 
MC6809E  over  other  microprocessors.  First,  all 
hardware  and  software  developed  thus  far  for  MARRS-1  is 
upward  compatible  with  the  6809.  Second,  with  the 
use  of  OS-9  (a  UNIX  derivative)  as  the  operating  system,  the 
computer  can  perform  multi-tasking  and  supervise  a  multi¬ 
user  environment.  These  characteristics  are  ideal  for 
control  of  a  mobile  autonomous  robot.  Third,  hardware/ 
software  availability  is  perhaps  the  most  important 
issue  as  discussed  in  chapter  II.  The  AFIT  Mobile 
Robotics  Lab  has  in  its  inventory  (see  Appendix  J)  a  Color 
Computer  with  OS-9  and  BASIC09.  The  Motorola  Exorciser  can 
also  accommodate  a  6809  card  to  enhance  lab  capabilities. 


High  level  languages  such  as  C  open  the  door  to 


increased  routines  and  utilities  that  can  be  used  to  control 


MARRS-1.  "Fortunately,  the  6809  microprocessor,  the  OS-9 


operating  system,  and  the  C  language  form  an  outstanding 


combination.  The  6809  was  specifically  designed  to 


efficiently  run  high  level  languages,  and  its  stack- 


oriented  instruction  set  and  versatile  repertoire  of 


addressing  modes  handle  the  C  language  very  well.  As 


mentioned  previously,  UNIX  and  C  are  closely  related,  and 


because  OS-9  is  derived  from  UNIX,  it  also  supports  C  to 


the  degree  that  almost  any  application  written  in  C  can  be 


transported  from  a  UNIX  system  to  an  OS-9  system. 


recompiled,  and  correctly  executed" (21s 1-1) .  Migration 


toward  the  68000  family  is  also  possible  by  first  going  to 


the  6809  and  OS-9.  There  is  even  a  version  of  OS-9  for  the 


68000  family  of  processors  making  a  simplified  software 


transition  guaranteed. 


Cooperation  Needed  in  Mobile  Robotics 


Mobile  Robotics  has  the  responsibility  of  bringing  many 


technologies  and  disciplines  together  as  a  unified  whole  and 


has  two  closely  related  areas  of  research:  1)  Artificial 


Intelligence  (AI),  and  2)  Pattern  Recognition  (PR).  In  their 


report  to  the  U.S.  Army  Engineer  Topographic  Laboratory, 


researchers  from  Stanford  Research  Institute  (SRI)  made  no 


distinction  between  AI  and  Robotics  giving  instead  a  unified 


model  of  the  two  as  shown  in  figure  6.1  (22:1), 
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Figure  6.1  Unified  AI/Robotics  Model 


The  part  of  Pattern  Recognition  (PR)  that  deals  with 
the  gathering  and  interpreting  of  sensory  information  falls 

in  the  area  of  figure  6.1  labeled  SENSING< - > INTERPRETING. 

The  AFIT  MARRS-1  robot  in  conjunction  with  the  stereo  vision 
system  being  developed  by  Captain  James  Holten  of  the  AFIT 
Signal  Processing  lab  could  form  the  hardware  of  the 

SENSING< - >INTERPRETING  and  GENERATING< - EFFECTING  blocks 

of  figure  1.  Pattern  Recognition  would  provide  software 
for  these  same  blocks  while  software  for  the  REASONING  and 
WORLD  MODEL  blocks  would  be  provided  by  Artificial 
Intelligence.  Additional  sensor  systems,  communications, 
computers,  software,  and  hardware  are  required  to  make 
MARRS-1  a  truely  autonomous  robot.  However,  the  required 
resources  do  exist  within  the  AFIT  Electrical  Engineering 
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Department.  It  may  be  argued  that  it  is  impossible  to  build 
a  truly  autonomous  robot  since  all  machines  created  by 
mankind  have  limitations.  Yet*  if  allowed  only  to  use 
existing  technology,  a  mobile  robot  with  tremendous 
capabilities  could  still  be  realized.  What  is  needed  is  a 
commitment  from  the  highest  level  possible  to  solve  the 
autonomous  robot  problem.  The  MARRS-1  robot  is  only  a  start 
towards  that  solution. 

Intradepartment  and  interdepartment  cooperation  to 
solve  problems  would  benefit  all  involved.  Dr.  Hans 
Moravec,  creator  of  the  Stanford  Cart  and  the  Carnegie- 
Mellon  University  (CMU)  Rover,  argues  that  advances  in 
mobile  robotics  would  bring  more  robust  and  general  AI  tools 
(23:  1),  (24:  882).  Would  that  not  be  true  for  all 
disciplines  that  cooperated? 

Conclusion 

Robots  need  sensors  along  with  their  mechanical 
devices  and  computational  elements  to  be  effective.  This 
places  a  new  perspective  on  the  responsibilities  of  mobile 
robot  designers  and  programmers  in  the  way  that  they  attack 
and  solve  their  problems.  These  are  System  integration 
problems  with  demanding  requirements.  Overlooking  an  item 
that  seems  trivial  may  have  long  range  negative 
consequences.  To  be  sure,  all  that  is  important  in  mobile 
robotics  has  not  been  identified  in  this  thesis. 
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RT99 

CHPA  990H 

E269 

26  EF 

BNE  RT19 

E26B 

BDE5  AC 

JSR  PEXISTS 

E26E 

98 

INX 

E26F 

FF  BF  09 

STX  BUFPTR 

E272 

CEE8  82 

LDX  ACTABLE 

E275 

A1  99 

HOOP 

OFA  99, X 

E277 

26  94 

BNE  DL19 

E279 

EE  91 

LDX  91, X 

E27B 

6E99 

Jtr  99, X 

E27D 

98 

DL19 

INX 

E27E 

98 

INX 

E27F 

96 

INX 

E289 

8CE8  A3 

rpx  98BA0R 

£283 

26  F9 

BNEDLOOP 

E285 

29  99 

BRA  ABORT 

£287 

CEE8B9 

ABORT 

LDX  AQQUES 

E28A 

8E  BE  7F 

RSGHON 

LDS  IBOS 

£280 

3F 

SUI 

E28E 

12 

FOB  12H 

A-8 


E2FA 

49 

DO 

E2FB 

8CBFE9 

CPI  ITCOJNT 

E2FE 

26  F7 

BNE  RUS14 

E344 

38 

RT1 

E341 

B6BF  M 

CHEXS31  LDMttSUH 

E 344 

36 

PSHA 

£305 

B0E4CC 

JSR  NEX2D 

E348 

33 

PUJ 

£319 

S3 

cot 

E34A 

It 

C8A 

E34B 

26  41 

BNE  CS1 

£340 

39 

RTS 

E34E 

34 

CS1  TSX 

E34F 

49 

DO 

£314 

3F 

SUI 

£311 

4F 

FCMFH 

£312 

80  E5  A7 

JSR  PSPACE 

E315 

CEE8BE 

LOX  MCXSNER 

E318 

39 

RTS 

E319 

36 

REAOACI  PSHA 

jLILBUG  READ  PORT  HITHOUT  WAIT 

E31A 

B6C4  41 

LDAA  IO+ACIAT+A.RX 

E310 

84  7F 

ANDA  47FH 

{OEM  PARITY  BIT 

E31F 

81  17 

CHPA  I17H 

{IS  IT  CONTROL  H  ? 

£32! 

26  42 

BNE  1SCTRLX 

;  IF  SO  UAIT  FOR  FURTHER  INPUT 

£323 

3F 

SHI 

{BEFORE  CONTINUING 

E324 

14 

FOB  14H 

E323 

81  18 

ISCTRLX  CHPA  418H 

;IS  IT  CONTROL  X  ? 

E327 

32 

PULA 

{IF  YES  THEN  CC  IS  SET 

E328 

39 

RET39  RTS 

E329 

84  4F 

C0NV4  ANDA  HFH 

jLILBUG  CONVERT  RIGHT  4  BITS  AND 

E32B 

88  94 

ADDA  I94H 

{PRINT  ROUTINE 

E320 

19 

DM 

E32E 

89  44 

ADCA  I44H 

£334 

19 

DM 

E331 

3F 

SHI 

E332 

11 

FC8  UH 

E333 

39 

RTS 

E334 

46 

man  inx 

{Advance  coapare  TO  pointer 

E335 

FFBFD9 

STX  TEHP2 

{Save  coa^are  TO  pointer 

£338 

FEBFD7 

CPRHEH  LDX  TQf>i 

{Fetch  coapare  pointer 

E33B 

A6  44 

LDM  4,1 

{Fetch  coapare  data 

E330 

46 

INX 

{Advance  coapare  pointer 

E33E 

FFBFD7 

STX  TEMPI 

{Store  coapare  pointer 

E341 

FEBf  D9 

LDX  TEMP2 

{Fetch  coapare  TO  pointer 

E344 

A1  44 

OFA  4,X 

{Coapare  A  to  indexed  data 

E3+6 

26  43 

BNE  CPRET 

;If  not  equal,  return 

E348 

5A 

DECS 

{Decreant  byte  counter 

E349 

26  £9 

BNE  R0ZR2P2 

{Counter  <>4,  continue  coaparing 

E34B 

39 

CPRET  RTS 

{Return  with  flags  conditioned 

E34C 

BDE3F4 

DISNEM  JSR  GETRNO 

{DISPLAY  MEMORY  ROUTINE  STMTS  HERE 

E34F 

80  43 

BSR  DISHEH1 

£351 

7EE2  42 

JTf  HONENT 

ft-lt 


E354 

CE8FCC 

DISMEN1  LDX  4ADCL 

E357 

A6  #1 

LDAA  tI|X 

E35? 

84  Ft 

ANDA  MFM 

E35B 

A7  01 

STAA  tl,X 

E350 

FEBFCE 

LDX  AODH 

E36t 

t9 

DEX 

E361 

3F 

SUI 

E362 

•2 

FC8  t2H 

E363 

CA  IF 

ORABMFH 

E365 

3F 

SUI 

E366 

•3 

FCB  t3H 

E367 

FFBFCE 

STX  ADOH 

E36A 

BDES2A 

BYTENUM  JSR  PCRLF 

E36D 

BDES2A 

JSR  PCRLF 

E37I 

CEE8E4 

LDX  N6SPACE 

E373 

3F 

SUI 

E374 

12 

FCB  12H 

E375 

4F 

CLRA 

E376 

36 

BYTEN11  PSHA 

E377 

BDE3  29 

JSR  COM4 

E37A 

BDE5  A7 

JSR  PSPACE 

E37D 

BDE5A7 

JSR  PSPACE 

E38t 

32 

PULA 

E381 

4C 

INCA 

E382 

81  1# 

CMPA  tltH 

£384 

26  Ft 

BNE  BYTEN11 

E386 

80  91 

OUTLOOP  BSR  READACI 

E388 

27  57 

BEQENDOH 

E38A 

6CE5  2A 

JSR  PCRLF 

E380 

CEBFCC 

LDX  IADOL 

E39t 

BDE5  AS 

JSR  P4HEXS 

E393 

FEBFCC 

LDX  ADOL 

E396 

C6  It 

LDAB  tltH 

E398 

3F 

INL00P1  SUI 

E39? 

tF 

FCBtFH 

E39A 

BDE5A7 

JSR  PSPACE 

E390 

5A 

DECS 

E39E 

26  F8 

RE  INL00P1 

E3AB 

BDES  A7 

JSR  PSPACE 

E3A3 

C6  It 

LDAB  tltH 

E3A5 

FEBFCC 

LDX  AODL 

E3A8 

A6tt 

INL00P2  LDAA  tt,X 

E3AA 

84  7F 

ANDA  I7FH 

E3AC 

8!  2t 

CMPA  I2W 

E3AE 

20  t4 

BLT  PERIOD 

E3Bt 

81  61 

CMPA  «61H 

E3B2 

20  t2 

BLT  PRNTASC 

E3B4 

86  2E 

PERIOD  LDAA  »2EH 

E3B6 

3F 

PRNTASC  SUI 

E3B7 

11 

FC8  UH 

E3B8 

t8 

INX 

E3B9 

SA 

DECS 

; POINT  TO  THE  'FROM'  AWRESS 

;  GET  LON  ORTCR  PART  OF  ADDRESS 

{MASK  LOU  ORDER  4  BITS 

{RETURN  NEW  LOU  ORDER  PART  OF  ADDRESS 

;CET  THE  'TO’  ADWESS 

\Mt  IT  UHAT  THE  USER  SAID  IT  WAS  TO  BE 

l 

;SET  LOU  ORDER  4  BITS 

I 

\ 

{RESTORE  (CU  *TO*  ADDRESS 

{PRINT  BYTE  NUMBER  GUIDE  LINE  BY  FIRST  PRINTING  CTLF 
;  TWICE 

{PRINT  4  LEADING  SPACES 


{CONVERT  RIGHT  4  BITS  AND  PRINT  AS  ASCII 

{UFPER  CASE  CHARACTER 

{PRINT  TUO 

{SPACES 

{GET  COUNTER 

;HAVE  UE  PRINTED 

{HEX  NUMBERS  t  TJflU  F? 

{KEEP  PRINTING  THEM  IF  NOT  FINISHED 

;QCCK  FOR  PRINT  END  OR  WAIT  FROM  USER 

{END  PRINT  IF  CWTROL  X  KEY  UAS  HIT 

{&SE  CONTINUE  PRINT  UITH  CRLF 

{GET  ADDRESS  OF  DATA  TO  BE  PRINTED 

{PRINT  ADDRESS  AS  4  HEX  UITH  A  SPACE 

{POINT  TO  THE  DATA 

{SET  UP  A  COUNTER  FOR  16  BYTES 

{PRINT  BYTE  AS  TUO  HEX  AND  POINT  TO  NEXT  BYTE 

{PRINT  A  SPACE 
{ONE  LESS  BYTE  TO  PRINT 
{PRINT  NEXT  BYTE  IF  NOT  DONE 
{PRINT  ANOTIER  SPACE 

;NOU  PRINT  THE  IS  BYTES  AS  ASCII  IF  POSSIBLE 

{POINT  TO  THE  FIRST  BYTE 

{GET  TIC  BYTE 

{STRIP  OFF  EIGHTH  BIT 

;IF  BYTE  IS  LESS  THAN  ASCII  SPACE 

{PRINT  A  PERIOD 

{ELSE  OCCK  TO  SEE  IF  IT  IS  A  PRINTABLE  CHARACTER 

{NOT  PRINTABLE  SO  PRINT  A  PERIOO 
{PRINT  TIC  CHARACTER  OR  A  PERIOD 

{POINT  TO  NEXT  BYTE 
{ONE  LESS  TO  PRINT 


A-ll 


E38A 

26 

EC 

m 

INLOOP2 

E38C 

19 

HEX 

E3BD 

FF 

BF 

CC 

STX 

ADDL 

ESC# 

CE 

BF 

CC 

LDX 

IADOL 

E3C3 

FF 

BF 

D7 

STX 

TOPI 

E3C6 

CE 

BF 

CE 

LDX 

•ADOH 

E3C9 

FF 

BF 

D9 

STX 

TEIF2 

E3CC 

C6 

•2 

L0ABM2 

E3CE 

BD 

E3 

38 

JSR 

CPRMEM 

E3D1 

22 

IE 

BHI 

ENDOH 

E3D3 

FE 

BF 

CC 

LDX 

ADDL 

Em 

« 

INX 

E3D7 

FF 

BF 

CC 

STX 

ADDL 

E3DA 

7D 

BF 

CD 

TST 

AOOLtl 

E3DO 

26 

A7 

BNE 

OUTLOCP 

E30F 

2* 

89 

BRA 

BYTENUM 

E3EI 

39 

ENDOH 

RTS 

E3E2 

BD 

13 

EOF 

BSR 

EOF! 

E3E4 

7E 

E2 

42 

JtP 

HONENT 

E3E7 

CE 

E8 

M 

E0F1 

LDX 

NTPEOF 

E3EA 

3F 

SUI 

E3EB 

12 

FC8 

12H 

E3EC 

BD 

ES 

2A 

JSR 

PCRLF 

E3EF 

39 

RTS 

E3F# 

BD 

E4 

E6 

GETRNG 

JSR 

NIT  ADR 

E3F3 

FE 

BF 

CA 

LDX 

ADR 

E3F6 

FF 

BF 

CC 

sn 

ADDL 

E3F9 

FF 

BF 

CE 

STX 

ADOH 

E3FC 

BO 

E4 

E6 

JSR 

NXTAOR 

E3FF 

27 

16 

GEO 

GETRG3 

m\ 

FE 

BF 

CA 

GETRG1 

LDX 

ADR 

E464 

FF 

BF 

CE 

sn 

ADOH 

E  417 

CE 

BF 

81 

GETRG3 

LDX 

IBUF 

E46A 

A6 

4E 

LDAA4EH.X 

E4#C 

E6 

4F 

LDAB  4FH,X 

EUE 

El 

4D 

SUB8  4DH.X 

E4lf 

A2 

4C 

SBCA4CH.X 

E412 

24 

•4 

BCC 

GETRG4 

E414 

CE 

E8 

AB 

RNGERR 

LDX 

MRNGERR 

E417 

39 

RTS 

E418 

FE 

BF 

CE 

GETRG4 

LDX 

ADOH 

E41B 

18 

INX 

E41C 

FF 

BF 

CE 

sn 

ADOH 

E41F 

39 

RTS 

E42I 

BD 

E4 

E6 

GO 

JSR 

NXTADR 

E423 

27 

16 

BEQ 

con 

E425 

FE 

BF 

CA 

LDX 

ADR 

E428 

FF 

BF 

EF 

sn 

PREO 

E42B 

7E 

E2 

FI 

0011 

vie 

RESTA< 

E42F 

8D 

13 

LOAD 

BSR 

L0AD2 

E4% 

7E 

E2 

8A 

Jtf 

MSGNON 

E433 

CE 

M 

II 

L0AD2 

LDX 

tXZERO 

;G0  PRINT  TIC  REST  OF  THE  16  BYTES 
{POINT  TO  TO  LAST  BYTE  PRINTED 
{SAVE  THE  ADDRESS 

;CET  A  WINTER  TO  TIC  LAST  BYTE  PRINTED 

{SAVE  TIC  POINTER  FOR  COMPARISON 

;GET  A  POINTER  TO  TIC  LAST  BYTE  TO  BE  PRINTED 

{SAVE  TIC  POINTER  FOR  COMPARISON 

;THE  POINTERS  ARE  2  BYTES  EACH 

{COMPARE  ADDRESSES 

{BRANCH  IF  FINISHED  WITH  MEMORY  PRINT 
{ELSE  GET  TIC  ADDRESS  OF  LAST  BYTE  PRINTED 
;MD  POINT  TO  NEXT  BYTE  TO  BE  PRINTED 
{SAVE  TIC  ADDRESS 

{IF  HE  HAVE  PRINTED  A  BLOCK  OF  DATA 

{THEN  GO  PRINT  TIC  BYTE  NUMBER  GUIDE  LHC  AND  16  BYTES 

{ELSE  GO  PRINT  NEXT  16  BYTES 

{RETURN  TO  CALLER 


c436 

FF 

BF 

C8 

STX  OFFSET 

E439 

FF 

BF 

CC 

STX  ADCL 

E43C 

•9 

LOCFST 

BEX 

E43D 

FF 

BF 

CE 

STX  ADOH 

E448 

BD 

E4 

E6 

JSR  NXTAOR 

E443 

27 

IE 

BED  LQAR1 

E443 

FE 

BF 

CA 

LDX  ADR 

E448 

FF 

BF 

C8 

STX  OFFSET 

E44B 

BO 

E4 

E6 

JSR  NXTAOR 

E44E 

27 

13 

BEQ  LQA01 

E434 

FE 

BF 

C8 

LDX  OFFSET 

E453 

FF 

BF 

CC 

STX  ADDL 

E4S6 

CE 

88 

88 

LDX  8XZER0 

E459 

FF 

BF 

C8 

STX  OFFSET 

E45C 

80 

A3 

BSR  GETRG1 

E45E 

FE 

BF 

CF. 

LDX  ADOH 

E461 

2# 

D9 

BRA  LOOFST 

E463 

•1 

L0AD1 

NOP 

E464 

80 

5D 

RUPEE 

BSR  FINOS 

E466 

BD 

E6 

11 

JSR  NAITTY 

E469 

81 

38 

CNPA  838H 

E46B 

27 

F7 

BEQ  RUPEE 

E46D 

87 

BF 

D? 

STAA  RECTYP 

E478 

7F 

BF 

a 4 

CLRCKSUN 

£473 

BD 

E4 

CC 

JSR  NEX2D 

E476 

4A 

BETA 

E477 

4A 

DELA 

E478 

4A 

OECA 

£479 

B7 

BF 

D3 

STAA  COUNT 

E47C 

BD 

E4 

CC 

JSR  NEX2D 

E47F 

B7 

BF 

CA 

STAA  ADR 

E482 

BD 

E4 

CC 

JSR  NEX2D 

E483 

B8 

BF 

C9 

ADDA  OFFSET' 

E488 

B7 

BF 

CB 

STf..  ADR+1 

F48B 

B6 

BF 

CA 

LDAA  ADR 

E48E 

B9 

BF 

C8 

ADCA  OFFSET 

E491 

B7 

BF 

CA 

STAA  ADR 

E494 

B6 

BF 

D2 

LDAA  RECTYP 

E497 

81 

31 

CNPA  831H 

e n 

26 

14 

Bft  LHF4 

E49B 

BD 

E4 

CC 

LDR18 

JSR  NEX20 

E49E 

FE 

BF 

CA 

LDX  ADR 

E4A1 

BD 

E3 

C2 

JSR  SETOFF 

E4A4 

86 

INX 

E4A5 

FF 

BF 

CA 

STX  ADR 

E4A8 

7A 

BF 

D3 

DEC  COUNT 

E4AB 

2E 

EE 

BGTLDR18 

E4AD 

28 

84 

BRA  LHF9 

E4flF 

81 

39 

LHF4 

CNPA  839H 

E4B1 

26 

8E 

BNE  BADTAP 

E4B3 

BD 

E3 

81 

LHF9 

JSR  OEKSN 

E4B6 

B6 

BF 

D2 

LDAA  RECTYP 

I 


E4B9 

81  39 

QfA  839H 

E4B8 

24  A6 

ONE  L0A01 

E4BD 

CEE8B5 

LUX  8CE0F 

E4C8 

39 

RTS 

E4C1 

2#  Al 

BAOTAP 

BRA  RDPRE 

E4C3 

•1 

FINOS 

NOP 

E4C4 

BDE6  11 

FS14 

JSRHAITTY 

E4C7 

81  53 

OPA  853H 

E4C9 

26  F9 

REFS18 

E4CB 

39 

RTS 

E4CC 

BO  E6  11 

(020 

JSRHAITTY 

E4CF 

16 

TAB 

E4M 

B0E6  11 

JSRHAITTY 

E4D3 

36 

PSHA 

E4D4 

37 

PSHB 

E4D5 

31 

TSX 

E4D6 

C6I2 

LDA8  882 

E4Q8 

3F 

SHI 

E429 

15 

FCB  15H 

E4DA 

24  ES 

BCC  BAOTAP 

E4K 

17 

TBA 

E4DD 

FBBFD4 

adob  asm 

E4E8 

F7BFM 

stab  asm 

E4E3 

31 

INS 

E4E4 

31 

INS 

E4E3 

39 

RTS 

E4E6 

7FBFCA 

NXTADR 

cm  ADR 

E4E9 

7FBFC8 

CLR  ADR+1 

E4EC 

BDE5AC 

JSR  PE XI STS 

E4EF 

26  81 

BNENA1 

E4F1 

39 

NXTRTS 

RTS 

E4F2 

C6  47 

na: 

U9AB  847H 

E4F* 

3F 

SHI 

E4F5 

15 

FCB  194 

E4F6 

FFBFD8 

STX  BUFPTR 

E4F9 

B7  BFCA 

STAA  ADR 

E4FC 

F7BFCB 

STAB  ADR+1 

E4FF 

A6  88 

LDM  88, X 

E34) 

3F 

SHI 

E582 

13 

FCB  13H 

E503 

25  81 

BCS  NA3 

E585 

39 

RTS 

E506 

7EE2  87 

m 

JMP  ABORT 

E589 

A6  88 

OUTCHX 

LOM  88, X 

E58B 

37 

OUTCh 

PSHB 

esec 

F6C8  88 

LDAB  IO+ACIAT 

E58F 

57 

ASRB 

E318 

24  8A 

BCC0C18 

E512 

F6C8  81 

LDAB  IO+ACIAT+A.RX 

E515 

Cl  IB 

CNPB  815H 

E517 

26  83 

BNE  0C18 

E519 

7E  E2  87 

JWP  ABORT 

A-14 
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E31C 

3F 

0C19 

SHI 

E51D 

11 

FCB  UH 

ES1E 

81 

90 

Clf  A  I9DH 

E529 

26 

96 

M  0C29 

E522 

86 

9A 

LDAA 

E524 

3F 

SHI 

E525 

11 

FCB  UH 

E526 

86 

90 

LDAA  99DH 

E5~i 

33 

0C29 

PULP 

E529 

39 

RTS 

E52A 

86 

90 

PCRLF 

LDAA  I9DH 

E52C 

29 

00 

BRA  OUTCH 

E52E 

80 

93 

PUNCH 

BSR  PUNCH1 

E530 

7E 

E2 

42 

JHPHOfCNT 

E533 

BO 

E3 

F9 

PUNCH1 

JSR  CETRNO 

E536 

CE 

99 

99 

LOX  9XZER0 

E339 

FF 

BF 

C8 

STX  OFFSET 

ES3C 

80 

A8 

BSR  NXTADR 

E53E 

27 

96 

BEQPHF29 

E549 

FE 

BF 

CA 

LOX  ADR 

E543 

FF 

BF 

C8 

STX  OFFSET 

E546 

F6 

BF 

CF 

PHF29 

LOAB  ADDH+1 

E349 

F9 

BF 

CD 

SUBS  ADDL+1 

E54C 

86 

BF 

CE 

LDAA  ADDH 

E54F 

B2 

BF 

CC 

S8CA  AODL 

E552 

26 

94 

BNE  PUND19 

E554 

Cl 

19 

CHPB  919H 

ES56 

23 

92 

BLS  PUND29 

E358 

C6 

19 

PUN0I9 

LOAB  919H 

E55A 

SC 

PUND29 

INCB 

E558 

sc 

1NCB 

E53C 

5C 

INCB 

E55D 

F7 

BF 

03 

STAB  COUNT 

E569 

CE 

E8 

OB 

LOX  9QS1 

E563 

3F 

SHI 

E564 

12 

FCB  12H 

E565 

5F 

CLRB 

E566 

CE 

BF 

03 

LOX  9C0UNT 

E569 

80 

32 

BSR  PUNBYTE 

ESSB 

37 

PSHB 

E56C 

FE 

BF 

CC 

LOX  ADOL 

E56F 

B6 

BF 

C8 

LDAA  OFFSET 

ES72 

F6 

BF 

C9 

LOAB  OFFSETS 

E575 

3F 

SHI 

E576 

98 

FCB  98 

E577 

FF 

BF 

CA 

STX  ADR 

E57A 

CE 

BF 

CA 

LOX  4ADR 

E57D 

33 

HJLB 

ES7E 

80 

ID 

BSR  PUNBYTE 

E589 

80 

IB 

BSR  PUNBYTE 

E582 

FE 

BF 

CC 

LOX  ADDL 

E565 

80 

16 

PREC19 

BSR  PUNBYTE 

A-13 


E587 

2EFC 

BGT  PREC1I 

E589 

FF8FCC 

STX  ADCL 

E58C 

CEBFD4 

LDX  «CKSUH 

ESS F 

S3 

core 

E598 

E7  H 

STAB  88, X 

E592 

80  #9 

BSR  PUNBYTE 

E594 

FEBFCC 

LDX  ADDL 

E597 

8C8FCE 

CPX  ADOH 

E59A 

26  AA 

BNE  PHF28 

E39C 

39 

RTS 

E59D 

EBM 

MBYTE  ADOB  88,  X 

E59F 

3 F 

SMI 

ESA8 

IF 

FC8  8FH 

E5A1 

7ABFD3 

DEC  COUNT 

E3A4 

39 

RTS 

E5A5 

3F 

P4HEIS 

SWI 

ESA6 

18 

FC8  18H 

E5A7 

86  28 

PSPACE 

LOAA  I28H 

E5A9 

3F 

SWI 

E5AA 

11 

FCB  UH 

E5AB 

39 

RTS 

E5AC 

FEBFD8 

PEXISTS  LDX  BUFPTR 

E5AF 

A6  88 

PXISTX 

LOAA  88,1 

E5B1 

3F 

SWI 

E5B2 

13 

FCB  13H 
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FOB  91 

E891 

44 

FCC  'D' 

E892 

E3  4C 

FOB  DISHEH 

■  ; 

E894 

52 

FCC  'R' 

* 

1 

E895 

E2C5 

FOB  FREDS 

E897 

45 

FCC  'E' 

i 

E898 

E3  E2 

FOB  EOF 

■  i 

E89A 

43 

FCC  'C' 

, 

E89B 

BF45 

FOB  COLD 

-  i 

►  *  1 

’  < 

"t  i 

E890 

57 

FCC  'll' 

E89E 

BF4B 

FOB  HORN 

1 

E8A4 

4F 

FCC  '0' 

*.  i 

ECA1 

BF  46 

FOB  OOESSEY 

E8A3 

42 

OBAOR  FC8  42H 

* ,  « 

E8A4 

41 

FC8  41H 

E9A3 

44 

FC8  44H 

i  <r 

E8A6 

24 

FC8  24H 

E8A7 

41 

FCB41H 

J  , 

E8A8 

44 

FC8  44H 

(V 

E8A9 

52 

FCB52H 

.*•  * 

E8AA 

44 

FC8  44 

gj 

E8A8 

52 

QRNGERR  FCB  52H 

E8AC 

41 

FCB  41H 

Ml 

E8AD 

4E 

FCB  4EH 

E8AE 

47 

FCB47H 

v  1 
■  .  * 

E8AF 

45 

FCB  45H 

>  - 

E8M 

24 

FCB  2fH 

E8B1 

45 

FCB  45H 

i  ‘ 

■t 

E8B2 

52 

FCB  52H 

w 

E883 

52 

FCB  52H 

E8B4 

44 

FCB  44 

>y 

E8BS 

45 

QEOF  FCB45H 

E8B6 

4F 

FC8  4FH 

E887 

44 

FCB  44H 

sj 

EC38 

44 

FCB  44 

IJ 

E889 

3F 

QQUES  FC8  3FH 

.*• 

E8BA 

3F 

FC8  3FH 

E88B 

3F 

FCB  3FH 

E8EC 

3F 

FCB3FH 

E880 

44 

FCB  44 

* 

E8GE 

43 

QCKSMER  FCB  43H 

S- 

E8BF 

4B 

FCB  4BH 

;::i 

E8C4 

S3 

FCB53H 

fi 

A-25 

^  ~  "V* 

E9M  BD  E9  IE 
E96?  38 


|  INTERRUPT  HANDOER  FOR  TI*  aOCK  AND  SONAR  AT  II  HZ 

|  THIS  SUBROUTINE  IS  CALLED  BY  HARDWARE  INTERRUPT  (IRQ)  AND  AS 

|  SUCH,  ALL  REGISTERS  AND  SYSTEM  STATUS  ARE  PRESERVED  ON  T)C  STACK. 

|  ON  ENTRY,  THE  PROCESSOR  WILL  SET  THE  INTERRUPT  MASK.  IT  WILL 

{  CLEAR  THE  MASK  ON  EXIT  AND  RESTORE  THE  PROCESSOR  REGISTERS/STATUS 
j  ON  EXIT. 

t 

TICHAN  OSR  FEE  {GO  CHECK  OPTICAL  SHAFT  ENCODERS  FIRST 

RTI 


l 

J 

I 


pm 

6C 

N 

INC*?* 

INC  X 

E96A 

26 

64 

BNE  INRET 

E99C 

•9 

"EX 

E90D 

5A 

DECS 

E96E 

26 

F8 

ONE  I  NOW 

E91I 

3? 

INRET 

I 

RTS 

E911 

A6 

N 

1 

DCRMEM 

LMA  X 

E913 

81 

61 

SUBA  66IH 

E9I5 

A7 

66 

STM  X 

E9I7 

2\ 

64 

BCC  DCRET 

E919 

•9 

DEX 

E91A 

5A 

DECB 

E9IB 

26 

F4 

BNE  DCRMEM 

E9ID 

39 

DCRET 

RTS 

{Increment  memorg  content! 

; If  result  not  I,  return 

{Advance  meorg  pointer 

{Decrement  frecision  counter 

{If  counter  <>6,  continue  incrementing 

{Return 


{Fetch  byte  fros  memorg 

{Decrement  the  byte 

{Save  byte  in  memorg 

{If  no  borrow  required,  return 

{Advance  memorg  pointer 

{Decrement  precision  counter 

;If  counter  <>!,  continue  decrementing 

{Return 


DATE!  8  OCT  84 
VERSION:  1.1 

WME:  FEE  (AS  IN  THE  NURSERY  RHYNE) 


FUNCTION:  THIS  INTERRUPT  HANDLER  UPDATES  THE  COUNTS  * 
IN  PREDEFINED  INCREMENTS  (DEFAULT  I"  (3FH)  * 

WHEN  THE  PTH  REAOCS  ITS  THE-OUT  (I.E.  » 

INCREMENT  DISTANCE  MS  BEEN  MEASURED,  THEN  * 
THE  PTM  AUTOMATICALLY  RESETS  T\£  COUNTER  * 

AND  THIS  ROUTINE  INCREMENTS  Y>£  COUNT  IN  * 

MEMORY  » 

THE  FRONT  WHEEL  OSE  MEASURES  THE  ANGULAR  * 

POSITION  OF  THE  FRONT  WHEEL  AND  NOT  DISTWCE  * 
TRAVELED  BY  TIE  FRONT  WHEEL.  » 

t 

OUTPUTS:  INCREMENTS  THE  FOLLOWING  REGISTERS  IN  MEMORY:  * 
FWCOUNT  * 

RWCOUNT1,  RWC0LWT2,  RWMODI,  RWM0D2,  * 

LWCOUNTI,  LWC0UNT2,  LWMODI,  LWM0D2  * 


I 


E91E 

Bo  C«  31 

FEE 

LDAA 

IO+PTHF+PTMSTAT 

5  GET  FRONT  W)€EL  STATUS 

£921 

48 

ASIA 

5 CHECK  FRONT  WHEEL  IRQ  FLAG 

E922 

25  IF 

BCS 

FRONTWHEEL 

•, CONTINUE  IF  TRUE  INTERRUPT 

FM 

B6C4  41 

FIE 

LDAA 

I O+PTMR+PTMST  AT 

{ELSE  GET  RIGHT  WHEEL  STATUS 

E927 

48 

ASIA 

{CHECK  RIGHT  WHEEL  IRQ  FLAG 

E928 

25  IE 

BCS 

RIGHTWHEEL 

{CONTINUE  IF  TRUE  INTERRUPT 

E92A 

B6»  39 

FOE 

LDAA 

HHPTML+PTMSTAT 

{ELSE  GET  LEFT  WHEEL  STATUS 

E92D 

48 

ASIA 

{CHECK  LEFT  WHEEL  IRQ  FLAG 

E92E 

25  37 

BCS 

LEFTMHEEL 

{CONTINUE  IF  TRUE  INTERRUPT 

E939 

7EE9C2 

FUN 

Jf 

TICHAN1 

{DONE  WITH  OSE  INTERRUPTS 

I 

HEAR 

M 

CHIRP 

OF 

SONAR 

ONE! 

(SO  GO  CHECK  THE  SONAR  INTERRUPTS) 


E933 

47 

FRONTWHEEL 

ASRA 

I 

E934 

47 

ASRA 

{SET  IF  COUNTER  1  GENERATED  Ik. 

E935 

24  86 

BCC 

CHCFWC2 

;IF  NOT  THEN  SERVICE  COUNTER  2 

E937 

7ABEF8 

CHKFWC1 

DEC 

FWCOUNT+l 

{WHEEL  HAS  TURNED  CCW 

E93A 

FECI  32 

LOX 

IO+PTHF+T.CNT1 

{CLEAR  INTERRUPT 

E930 

47 

OKFWC2 

ASRA 

{SEE  IF  COUNTER  2  GENERATED  IRQ 

E93E 

24  16 

BCC 

FWDONE 

;IF  NOT  CHECK  OTHER  WHEELS 

E948 

7CBEF8 

INC 

FWCOUNT+1 

;U€EL  HAS  TU9ED  CLOCKWISE 

E943 

FECI  34 

LDX 

I0+PTMF+T.CNT2 

{CLEAR  INTERRUPT 

E946 

21  DC 

FWDONE 

I 

RIGHTWEEL 

BRA 

FIE 

{GO  CHECK  OMR  WHEELS 

E948 

47 

ASRA 

• 

1 

E949 

47 

ASRA 

{SEE  IF  COUNTER  1  GENERATED  IRQ 

E94A 

24  IB 

BCC 

OKRWC2 

{IF  NOT  THIN  SERVICE  COUNTER  2 

E94C 

C&  12 

CHKRWC1 

LDAB 

M2 

{•BYTES  IN  RWCGUNT1  (SIZE) 

E94E 

CE  BE  FA 

LDX 

tRWCOUNTM 

{SET  POINTER  TO  RWCOUNT1  LS8YTE 

E951 

B0E9I8 

JSR 

INCMEM 

{WHEEL  ms  MOVED  FORWARD  I* 

{THAT'S  ONE  SHALL  STEP  FOR  MARRS-I 
{Oft  GIANT  LEAP  FOR  ROBOT  KIND!! 

E954 

FECI  42 

LDX 

IQ+PTHOT.CNT1 

{CLEAR  INTERRUPT 

E957 

47 

CHKRWC2 

ASRA 

{SEE  IF  COUNTER  2  GOERATED  IRQ 

E958 

24  88 

BCC 

RWDONE 

{IF  NOT  CHECK  OMR  WHEELS 

E95A 

C6  82 

LDAB 

M2 

{•BYTES  IN  RWC0UNT2  (SIZE) 

E95C 

CE  BE  FC 

LDX 

IRWC0UNT2H 

{SET  POINTER  TO  RWC0UNT2  LSBYTE 

E95F 

BDE9  18 

JSR 

INCMEH 

{WHEEL  HAS  MOVED  BACKWARDS 

E962 

FECI  44 

LDX 

I0+PTMRVT.CNT2 

{CLEAR  INTERRUPT 

E963 

21  C3 

RWDONE 

? 

LEFTWHEEL 

BRA 

FOE 

{GO  CHECK  OMR  WHEELS 

E967 

47 

ASRA 

I 

E968 

47 

ASRA 

;$EE  IF  COUNTER  1  CDCRATED  IRQ 

E969 

24  6fi 

BCC 

CHKLWC2 

; IF  NOT  THEN  SERVICE  COUNTER  2 

E968 

C6  62 

CHO.WCI 

LDAB 

•62 

{•BYTES  IN  LWCOUNT1  (SIZE) 

E96D 

CE  BEFE 

LDX 

•LWCOUNTl+l 

{SET  POINTER  TO  LKCCUNTI  LSBYTE 

em 

BDE9  68 

JSR 

INCMEM 

{WHEEL  MS  MOVED  FORWARD  1* 

E973 

FEC6  3A 

LDX 

IO+PTN.+T.CNTI 

;U5A:<  INTERRUPT 

E976 

47 

OKLWC2 

ASRA 

;SEE  IF  COUNTER  2  GENERATED  IRQ 

E977 

24  6B 

BCC 

LWDONE 

;IF  NOT  CHECK  OTHER  WHEELS 

E979 

C6  62 

LDAB 

•62 

{•BYTES  IN  LWC0UNT2  (SIZE) 

E97B 

CE  BF  66 

LDX 

•LWC0UNT2M 

{SET  POINTER  TO  LWC0UNT2  LSBYTE 

E97E 

BDE9  68 

JSR 

INCMEM 

{WHEEL  HAS  MOVED  BACKWARDS 

E98I 

FEC6  3C 

LDX 

IO+PTH+T.CNT2 

{CLEAR  INTERRUPT 

E984 

26  AA 

LWDONE 

BRA 

FUN 

{RETURN  TO  MAIN  INTERRUPT  HANDLER 

I 


DATE!  8  Oct  84 
VERSION!  1.6 
MHEi  OSEPRELOAD 
NODULE  NUMBER! 

FUNCTION!  LOADS  VALUES  YOU  SPECIFY  INTO  PTN  LATO£S 
OF  OARRS-I  OPTICAL  SHAFT  ENCODER  PTN'S 
INPUTS:  PRELOAD  VALUES  (16  BIT)  MUST  BE  IN  X  REGISTER 
USE  THE  FOLLOWING  FORMULA  TO  CONVERT  FROM 
INCHES  TO  COUNTS! 


COUNTS  *  (M6  *  DISTANCE  (INCH)  )  -1 
THIS  IS  FOR  THE  LEFT  AND  RIGHT  WHEELS 
NOTE:  EACH  WHEEL  COUNT  PRELOAD  ROUTINE  IS  A 
SEPERATE  CALLABLE  ROUTINE 

OUTPUTS;  THE  FOLLOWING  MEMORY  REGISTERS  ARE  AFFECTED; 
BCPTMFl,  BCPTHF2,  BCPTMRI,  BCPTMR2,  BCPTML2, 
AND  BCPTHL2 


HISTORY! 


;OSE  PRELOAD  ROUTINES 
I 


E986 

FF  BE  AB 

PRELPTHF 

STX 

BCPTMFI 

{CLOCKWISE  ROTATION 

E989 

FF  BE  AD 

STX 

BCPTTF2 

{COUNTERCLOCKWISE  ROTATION 

E98C 

BDEC  27 

JSR 

INTPTMF 

{RE-INITIALIZE  FRONT  HEEL 
{WITH  NEW  VALUES 

E98F 

39 

RTS 

{RETURN  TO  CALLER 

E996 

FF  BE  B7 

PRELPTMR 

STX 

BCPTHU 

{FORWARD  MOTION 

E993 

FF  BE  B9 

STX 

BCPTMR2 

{REVERSE  MOTION 

E996 

BDEC7F 

JSR 

1NTPTHR 

{RE-INITIALIZE  RIGHT  WHEEL 

E999 

39 

RTS 

{RETURN  TO  CALLER 

E99A 

FF  BE  81 

PRELPTML 

STX 

BCPTN.1 

{FORWARD  MOTION 

E990 

FF  BE  B3 

STX 

BCPTML2 

{REVERSE  MOTION 

E9A® 

BD  EC  53 

JSR 

INTPTML 

{RE-INITIALIZE  LEFT  WICEL 

E9A3 

39 

RTS 

{RETURN  TO  CALLER 

i 

i 


;( 

}*  DATE*  8  OCT  84 

;»  VERSION:  l.« 

;*  NAME:  FWRESET,  RWRESET,  AND  LWRESET 

|i 

;«  FUNCTION:  ALLOUS  USER  TO  RESET  WHEEL  COUNT  VALUES 
?*  TO  ANY  VALUE  t€  OESIRES  WITHIN  THE 

|>  FOLLOWING  LIMITS: 

;*  FWCOUNT  MAX  599  DECIMAL 

j*  RUCOUNT1,  RWCOUNT2,  LWCOUNT1,  AND  LWC0UNT2 

j*  ALL  CAN  HAVE  MAX  COUNTS  OF  9FFFFH 

;*  THIS  ROUTINE  &SO  CLEARS  TIC  MODULO  COUNT 

1*  FOR  THE  LEFT  AND  RIGHT  WHEELS 

;t 

;*  INPUTS:  X  REG  -  NEW  VALUE  AND  CALL  THE 
;•  •  APPROPRIATE  ROUTINE 

•t  ■ 

|»  4 

.  H4HIIHHHim»HHH*HHIHHIHIIimHHHHHmHUHm 


1 

I 


E9A4 

FF  BEF7 

FWRESET 

STX 

FWCOUNT 

E9A7 

39 

RTS 

E9A8 

FF  BEF9 

RWRESET 

STX 

RWCOUNTt 

E9AB 

FF  BE  FB 

STX 

RWC0UNT2 

E9AE 

7F  BF  91 

cut 

RWMQD1 

E9B1 

7F  BF  92 

CLR 

RWM0D2 

E9B4 

39 

RTS 

E9B5 

FF  BEFD 

LWRESET 

STX 

LWCOUNT1 

E9B8 

FF  BEFF 

STX 

LWCOUNT2 

E9BB 

7F  BF  93 

CLR 

LWMODi 

E9BE 

7F  BF  94 

OR 

LWM0D2 

E9C1 

39 

RTS 

I 

I 

I 

;  COMMENTS  CONCERNING  THE  PTH'S  FOR  TIC  WHEEL  OPTICAL  SHAFT  ENCODERS 
• 

;  CIRCUMFERENCE  OF  LEFT  AND  RIGHT  WHEELS  IS  18.75' 

;  THERE  ARE  1299  COUNTS  PER  REVOLUTION  AVAILABLE  WITH  THE 
;  DATAMETRICS  K-3  OPTICAL  SHAFT  ENCODER.  THUS  THERE  ME 
5  64  COUNTS  (3FH)  PER  1*  DISTANCE  TRAVELED 

1 


ft-39 


RIGHT  WHEEL: 

FORWARD  NOTION 

A  CHANEL  (COUNTER  2)  GATES  B  CHANH  (COUNTER  1) 

REVERSE  NOTION 

B  CHANEL  (COUNTER  1)  GATES  A  OWfEL  (COUNTER  2) 

LEFT  WHEEL: 

FORWARD  NOTION 

B  CHANCL  (COUNTER  2)  GATES  A  CHANEL  (COUNTER  1) 

REVERSE  NOTION 

A  CHANNEL  (COUNTER  1)  GATES  B  CHANNEL  (COUNTER  2) 

FRONT  WHEEL  PTH  KEEPS  TRACK  OF  ABSOLUTE  HEADING 
OF  FRONT  DRIVE  WHEEL.  WITH  THE  DRIVE  WHEEL  CENTERED, 

THE  COUNT  AT  FWCOUNT+1  SHOULD  BE  W. 

WITH  THE  FRONT  DRIVE  WHEEL  NAT  LEFT  FUCOUNT+1  SHOULD  BE  IFF. 

WITH  THE  FRONT  DRIVE  WHEEL  9*  DEGREES  RIGHT  OF  CENTER,  TIC  FUCOUNT+l 
SHOULD  BE  194. 

THIS  IS  ASSURING  THAT  A  DEFAULT  VALUE  OF  M3  IS  USED 
AS  m  INCREMENTAL  VALUE  ON  THE  FRONT  MCEL  PTH  &SO 
KNOWN  AS  BCPTHF1  OR  BCPTHF2 

FRONT  WHEEL: 

CLOCKWISE  NOTION 

B  CHANEL  (COUNTER  2)  GATES  A  CHANEL  (COUNTER  1) 

COUNTER-CLOCKWISE  NOTION 

A  CHANEL  (COUNTER  1)  GATES  B  CHANEL  (COUNTER  2) 


E9C2 

CEC9M 

I 

TICHAN1 

LDX 

•10 

; POINT  TO  I/O  AREA 

E9C5 

A6  49 

LDAA 

PIAAB+P.SRA,X 

5 GET  PIA  A  STATUS 

E9C7 

48 

ASLA 

{CHECK  INTERRUPT  FLAG  OF  PIA  A 

E9C8 

23  13 

BCS 

TICHAN2 

{CONTINUE  IF  TRUE  INTERRUPT 

E9CA 

7EBEC7 

I 

TICHAN2 

Jf 

NORETIC 

{ELSE  RETURN  TO  CALLER 

E9CD 

EE  1A 

LDX 

PTHAB+T.CNTi,X 

{GET  SOMR  READING  FROM  OWHEL  A 

E9CF 

FFBEE6 

STX 

T1CTEHPB 

{SAVE  IT 

E9D2 

B6BEE7 

LDAA 

TICTEHN+1 

{GET  LOW  8  BITS 

E9D5 

43 

com 

{DATA  IS  IN  NEGATIVE  l'S  CONPLENENT 

SO  WE  HUST  CONVERT  IT  TO  BE  POSITIVE 

THE  DISTANCE  MEASURED 

IS  FROM  THE  CENTER  OF  THE  ROBOT 


I 


E9D6  B7  BE  Cl 


STAA  SONARA 


E9DC 

EE  1C 

LDX 

PTMB*T.CNT2,X 

;GET  SONAR  READING  FROM  CWWCL  B 

E9DE 

FF  BE  E6 

STX 

TICTEHP# 

{SAVE  IT 

E9E1 

B6BEE7 

LDAA 

TICTEMP#*1 

;GET  LON  8  BITS 

E9E4 

43 

com 

{DATA  IS  IN  ONE'S  COIFLEHENT 

;S0  HE  HOST  CONVERT  IT  TO  BE  POSITIVE 

{THE  DISTANCE  KASURED 

;IS  FROM  THE  CENTER  OF  TIC  ROBOT 

E9E5 

R7BEC2 

STAA 

I 

LDX 

SONARB 

E9E8 

CEC4H 

•10 

{POINT  TO  I/O  MEA 

E9EB 

EE  22 

LDX 

PTHCD+T.CNTl.X 

{GET  SCWR  READING  FROM  CMMNEL  C 

E9ED 

FF  BE  Efr 

STX 

TICTOF# 

{SAVE  IT 

E9F# 

B6BEE7 

LIMA 

TICTEMP#*1 

{GET  LOU  8  BITS 

E9F3 

43 

com 

{DATA  IS  IN  ONE'S  CQFLEHENT 

;S0  HE  MUST  CONVERT  IT  TO  BE  POSITIVE 

{THE  DISTANCE  MEASURED 

;IS  FROM  THE  CENTER  OF  TIC  ROBOT 

E9F4 

B7  BE  C3 

STAA 

1 

LDX 

SONAAC 

E9F7 

CE  CM# 

•10 

{POINT  TO  I/O  AREA 

E9FA 

EE  24 

LDX 

PTHCD+T.CNT2,X 

{GET  SONAR  READING  FROM  CHMICL  D 

E9FC 

FF  BEE& 

STX 

TICTEHP# 

{SAVE  IT 
{GET  LOU  8  BITS 

E9FF 

B&BEE7 

LDAA 

TICTEHP(hl 

EA42 

43 

com 

{DATA  IS  IN  ONE'S  COMPLEMENT 

{SO  HE  MUST  CONVERT  IT  TO  BE  POSITIVE 

{THE  DISTANCE  MEASURED 

{IS  FROM  TIC  CENTER  OF  THE  WOBOT 

EA43 

B7BEC4 

STAA 

I 

LDX 

SONARD 

EA#6 

FEC#2E 

I0+PTMV+T.CNT3 

{UPDATE  TIME  SINCE  TIIC  ZERO 

EAW 

#8 

1NX 

Em 

FF  BE  09 

STX 

TICTIHE 

(TIME  FROM  COUNTER  IS  IN  ONE'S  COMPLEMENT 

EMD 

73  BE  D? 

CON 

TICTIHE 

EA1I 

73  BE  DA 

CON 

TICTIHE+i 

EA13 

FE8ED9 

LDX 

TICTIHE 

EA16 

FFBEC5 

STX 

SONTIHE 

{UPDATE  TIME  OF  LAST  SONtt  READING 

EA19 

CECM# 

LDX 

•10 

{POINT  TO  10  AREA 

EA1C 

A&48 

LDAA 

PIAAB+PIAPA,X 

;GET  SONAR  SELECTED  FOR  A  CHANNEL 

EA1E 

B7  BE  BD 

STAA 

SONARSLA 

{TELL  USER  UHICH  SONAR  HAS  SELECTED 

EA21 

A6  4A 

LDAA 

PIMB+PIAPB.X 

;GET  SONAR  SELECTED  FOR  B  CHANNEL 

EA23 

B7  BE  BE 

STAA 

SONARSLB 

{TELL  USER  UHICH  SONAR  UAS  SELECTED 

EA26 

A&5# 

LDAA 

PI ACD+PIAPC, X 

{GET  SONAR  SELECTED  FOR  C  CHANCL 

EA28 

B7  BE  BF 

STAA 

SONARSLC 

{TELL  USER  UHICH  SONAR  UAS  SELECTED 

EA2B 

A6  52 

LDAA 

PIACD+PIAPD,X 

{GET  SONAR  SELECTED  FOR  D  CHAMCL 

EA2D 

B7  BE  C# 

STAA 

SCNARSLD 

{TELL  USER  UHICH  SONAR  UAS  SELECTED 

EA3 

7DBEE1 

TST 

SONCHANGt 

{SEE  IF  ICU  SONARS  ARE  TO  BE  SELECTED 

EA33 

27  83 

BEQ 

TICHAN3 

EA35 

7EBEC7 

JMP 

HGRETIC 

EA38 

B6BEE2 

TICHAN3  LDAA 

SONNEXA 

{GET  NEXT  SONAR  SELECT  BYTE  FOR  SOMR  A 

EA3B 

A7  48 

STAA 

PIAAB*PIAPA,X 

{WRITE  IT  OUT  TO  THE  PIA 

EA3D 

B6BEE3 

LDAA 

SCNNEXB 

{GET  NEXT  SONAR  SELECT  BYTE  FOR  SCUM  B 

EA44 

A7  4A 

STM 

PIMB+PIAPB.X 

{WRITE  IT  OUT  TO  TIC  PIA 

EA42 

B6BEE4 

LDAA 

SOWCXC 

{GET  NEXT  KM  SELECT  BYTE  FOR  SONAR  C 

EA45 

A7  54 

STAA 

PIACD+PIAPC,! 

{WRITE  IT  OUT  TO  THE  PIA 

EA47 

B6BEE5 

LDAA 

SCWCXD 

{GET  NEXT  SONAR  SELECT  BYTE  FOR  SONAR  D 

EA4A 

A7S2 

STAA 

PIACD*PIAPD,X 

{WRITE  IT  OUT  TO  THE  PIA 

EA4C 

86  55 

LDAA 

M55H 

EA4E 

B7  BE  El 

STM 

SONCHANGE 

{TELL  USER  SOMR  SELECTS  HAVE  BEEN  CHANGED 

EASi 

7EBEC7 

vIP 

HORETIC 

SUBROUTINES  READSONAR 

BUFFERS  USER  PROGRAM  FROM  INTERRUPT  PROCESSING 
OF  SONAR  DATA.  SONtt  SELECT-READING  PAIRS  IN 
LOCATIONS  SONDATSA  TffiU  SONDATRD  ME  PLACED  THERE 
BY  THIS  SUBROUTINE  AND  AS  SUCH  ARE  GUARENTEED  TO 
REPRESENT  VALID/CURRENT  SONAR  READINGS. 

HmumhHmmmuHHHmiinmnntmwiHiHSH 
PLEASE  TAKE  NOTE  !!?!!!! 


SOMR  DATA  READINGS  SHOULD  BE  OBTAINED  BY  USER  PROGRAMS 
BY  CALLING  THIS  SUBROUTINE  AND  TON  CHECKING  THE  VALUES 
STORED  IN  LOCATIONS  SONDATSA  THRU  SONDATRD  I.E.l 


SONDATSA 

THIS 

SONDATRA 

THIS 

SONDATS8 

THIS 

SONDATRB 

THIS 

SCNDATSC 

THIS 

SONDATRC 

THIS 

SONDATSD 

THIS 

SONDATRD 

THIS 

nnimmiininninHnnHnniHiHHHHimiiHHmmmH 


EA54 

•F 

READSONAR  SEI 

EA55 

36 

PSHA 

EA56 

B6 

BE 

BD 

LDAA 

SSLA 

EA59 

B7 

BE 

F 

STAA 

^•■<ATSA 

EA5C 

B6 

BE 

BE 

LDAA 

SSLfi 

{MASK  "HE  INTERRUPT  SYSTEM 
5  SAVE  THE  A  REGISTER 
;GET  SONAR  SELECT  BYTE  A 
{STORE  SONAR  SELECT  BYTE  A 
{GET  SONAR  SELECT  BYTE  B 


A-33 


EA5F 

B7BEF1 

STAA 

S0NDATS8 

;  STORE  SONAR  SaECT  BYTE  B 

EA62 

B6  BEBF 

LDAA 

SSLC 

;GET  SONAR  SELECT  BYTE  C 

EA65 

B7  BE  F3 

STAA 

SONDATSC 

{STORE  SONAR  SELECT  BYTE  C 

EA68 

B6BEC9 

LDAA 

SSLD 

{GET  SONAR  SELECT  BYTE  D 

EA68 

87BEF5 

STAA 

SONDATSO 

{STORE  SONAR  SELECT  BYTE  D 

EA6E 

BA  BE  Cl 

LDAA 

SONARA 

{GET  SONAR  READING  FOR  SONM  A 

EA71 

B7  BE  Ft 

STAA 

SONDATRA 

{STORE  SOMR  READING  FOR  SONAR  A 

EA74 

BA  BEC2 

LDAA 

SONARS 

{GET  SOW*  READING  FOR  SONAR  B 

EA77 

B7BEF2 

STAA 

SONDATRB 

{STORE  SONAR  READING  FOR  SONffi  B 

EA7A 

BABEC3 

LDAA 

SOWRC 

{GET  SOMR  READING  FOR  SONM  C 

EA7D 

B7BEF4 

STAA 

SONDATRC 

{STORE  SONAR  READING  FOR  SONAR  C 

EA8# 

BABEC4 

LDAA 

SONARD 

{GET  SONAR  READING  FOR  SONAR  D 

EA83 

B7  BE  FA 

STAA 

SONDATRD 

{STORE  SOW  READING  FOR  SONAR  D 

EA86 

7DBEEE 

TST 

INTMASK 

{CHECK  TO  SEE  IF  OTHERS  WANT  INTERRUPTS  MASKED 

EA89 

2A  41 

BNE 

RDSONDONE 

{DONE  IF  YES 

EA8B 

IE 

ai 

{ELSE  CLEAR  INTERRUPT  MASK 

EAOC 

32 

RDSONDONE  PULA 

{RESTORE  A  REGISTER 

EA8D 

39 

RTS 

{RETURN  TO  CALLER 

{  SUBROUTINE  POS  (PUSH  ON  STACK)  IS  REENTRANT  BUT  NAY  NOT 
;  BE  USED  BY  AN  INTERRUPT  ROUTINE  SINCE  THE  SYSTEM  TBFORARY 
;  REGISTERS  ARE  USED. 

{  POS  PtfSHES  N  BYTES  ONTO  THE  STACK.  ON  ENTRY,  T)€  A  REGISTER 

j  CONTAINS  TIC  BYTE  COUNT  (N)  AND  THE  X  REGISTER  POINTS  TO  TIC 

1  FIRST  BYTE  TO  BE  PUSHED  ON  TO  THE  STACK.  TIC  B  AND  C  REGISTERS 

;  ARE  CLOBBERED,  ON  RETURN,  X  «  1  ♦  N  ♦  1,  A  «  N,  SP  •  SP  -  (N  ♦  1) 

{  BECAUSE  THE  STACK  GROWS  DOWNWARD!  THE  STACK  POINTER  MUST  EVENTUALLY 

{  RETURN  TO  IT'S  PREVIOUS  VH.UE  OR  OTHER  SYSTEM  PROGRAMS  OR  DATA  HILL 

;  BE  CLOBBERED  BY  THE  DOWNWARD  GROWING  STACK! 

I 


EASE 

9F 

POS 

SEI 

{MASK  HARDWARE  INTERRUPTS 

EA8F 

B7  BF  D5 

STAA 

TEHP9 

{SAVE  THE  A  REGISTER 

EA92 

FF  BF  D7 

STX 

TEMPI 

{AND  THE  X  REGISTER 

EA95 

39 

TSX 

;GET  THE  RETURN  ADDRESS  OF  TIC  SUBROUTINE 

{CALLER 

EA96 

EE  99 

LDX 

9.X 

EA98 

FF  BF  D9 

STX 

TEMP2 

{SAVE  TIE  RETURN  ADDRESS 

EA9B 

FEBFB7 

LDX 

TEMPI 

{POINT  TO  THE  BYTES  TO  BE  PUSHED  ON  TIC  STACK 

EA9E 

16 

TAB 

{BYTE  COUNT  IS  NOW  IN  B  REGISTER 

EA9F 

A6  99 

LOOPPOS1  LDAA 

9.X 

{LOOP  HERE  N  TIMES 

EAA1 

36 

PSW 

{PUSHING  VALUES  ONTO  TIC  STACK 

EAA2 

98 

I  NX 

{POINT  TO  NEXT  BYTE 

EAA3 

5A 

DECB 

{ONE  LESS  BYTE  TO  PUSH 

EAA4 

26  F9 

BNE 

LOOPPOS1 

;IF  B  IS  NOT  ZERO,  LOOP  UNTIL  DO*E 

EAA6 

B6BFDA 

I 

LDAA 

TEMP2+1 

{ELSE  PUSH  RETURN  ADDRESS 

EAA9 

36 

PSHA 

{ONTO  THE  STACK 

EAAA 

B6BFD9 

LDAA 

TEMP2 

EAAD 

36 

PSW 

A-34 


EAAE 

B6  BF  DS 

LDAA 

TOPI 

EASi 

F6BEEE 

LDAB 

INTMASK 

EAB4 

26  tl 

BNE 

POSDOIC 

EAB6 

IE 

CL! 

EAB7 

39 

POSOONE  RTS 

SUBROUTINE:  SIZENEM 


t 


EAB8 

IF 

1 

SIZEMEM 

SEI 

EAB9 

7F  BF  D5 

cut 

ran 

EABC 

FE  BE  DO 

I 

SIZELPl 

LDX 

RAMSIZEL 

EABF 

A6* 

LDAA 

M 

EAC1 

C6  55 

LDAB 

ifnii 

Wwrl 

EAC3 

E7H 

STAB 

M 

EAC5 

EG  II 

LDAB 

i,i 

EAC7 

Cl  55 

an 

M55N 

EAC9 

26  19 

BNE 

BADSZKM 

EACB 

C6  AA 

LDAB 

ftAAAU 

IWWi 

EACD 

E7H 

STAB 

M 

EACF 

E6H 

LDAB 

M 

EAD1 

Cl  AA 

an 

VVIVII 

EAD3 

26  IF 

BNE 

BADSZMEM 

EAD5 

A7H 

STAA 

M 

EAD7 

7DBFD5 

TST 

Ten 

EADA 

27  15 

BEQ 

FSTSZGD 

EADC 

18 

I  NX 

EADD 

BCBEDF 

CPX 

RAMSIZEH 

EAEI 

27  ID 

BEQ 

DNESZMEH 

EAE2 

21  DB 

BRA 

SIZELPl 

EAE4 

A7  II 

BADSZMEM  STAA 

M 

EAE6 

7F  BF  D5 

cut 

TEMPI 

EAE9 

18 

INX 

EAEA 

BC  BE  OF 

CPX 

RAMSIZEH 

EAED 

27  11 

BEQ 

DNESZMEH 

EAEF 

29  CE 

BRA 

SIZELPl 

EAF1 

FF  BE  DD 

FSTSZGD 

STX 

RAMSIZEL 

EAF4 

73  BF  D5 

COM 

TOPI 

EAF7 

ie 

INX 

EAF8 

BC  BE  DF 

CPX 

RAMSIZEH 

A-35 


{RESTORE  TIC  BYTE  COUNT  TO  THE  A  REGISTER 
;  CHECK  THE  INTERRUPT  MASK  BYTE 
;  IF  NOT  ZERO  UE  ARE  DOC 
{ELSE  CLEAR  THE  INTERRUPT  FLAG  AND 
{RETURN  TO  CALLER 


SIZES  HENORY.  IF  PIAAB  BIT  CA-2  IS  HIGH, 

THEN  DATA  IN  ROUS  SHARE  I NG  ADDRESS  SPACE 
WITH  RAMS  HILL  BE  LOADED  INTO  THE  RAMS  AS 
A  SIDE  EFFECT.  RAMS  HILL  APPEAR  AS  ROUS 
UNTIL  CA-2  IS  SET  LOU.  USE  SUBROUTINE 
ROMLAYRAN  FOR  AUTOMTIC  RON  TO  RAH  OVERLAY 
AND  CA-2  SET  TO  LOU. 

{SET  INTERRUPT  MASX 

{CLEAR  GOOD  HENORY  FLAG  (4H*NOT  GOOD, 

{  ifF-GOQO) 

{POINT  TO  LOU  RAM  ADDRESS 

{SAVE  VALUE  OF  tCMORY  ADDRESS  IN  A  REGISTER 
{START  MEMORY  TEST  TO  SEE  IF  LOCATION  IS  GOOD 


RESTORE  RAM  BYTE  AS  IT  HAS  BEFORE 
IS  THIS  THE  FIRST  GOOD  BYTE? 

BRANCH  IF  YES 

ELSE  POINT  TO  NEXT  MEMORY  LOCATION 

ARE  HE  AT  THE  END  OF  M  RAM  SIZE  TEST? 

IF  YES  TtCN  DONE 

ELSE  CONTINUE  MEMORY  SIZE  LOOP 

RESTORE  RAM  BYTE  AS  IT  HAS 

(ROM  OVERLAY  TO  RAM  OCCURS  HERE  IF 

PIAA  CA-2  IS  HIGH!) 

CLEAR  GOOD  MEMORY  FLAG 

POINT  TO  NEXT  MEMORY  LOCATION 

ARE  HE  AT  TW  END  OF  TO  RAH  SIZE  TEST? 

IF  YES  THEN  DONE 

CONTINUE  MEMORY  SIZE  LOOP 

SAVE  ADDRESS  OF  FIRST  GOOD  Rfll 

SET  GOOD  MEMORY  FLAG 

POINT  TO  NEXT  MEMORY  LOCATION 

ARE  HE  AT  THE  END  OF  THE  RAM  SIZE  TEST? 


EAF6 

2712 

BEQ 

nCSZKN 

{IF  YES  T)€N  DONE 

EAFD 

20  CO 

BRA 

SIZELP1 

{CONTINUE  HEHORY  SIZE  LOOP 

EAFF 

09 

DNES9CH  DEX 

EBW 

FF  BE  DF 

STX 

RAHSIZEH 

{STORE  ADDRESS  OF  LAST  HEHORY  LOCATION  TESTED 

EB83 

B6BEEE 

LDAA 

INTHASK 

;0€CK  TO  SEE  IF  HASK  IS  TO  BE  LEFT  SET 

EB8& 

2j  01 

BNE 

DSZHEH2 

{RETURN  TO  CALLER  IF  HASK  IS  TO  BE  LEFT  SET 

EGOS 

OE 

ai 

{ELSE  CLEAR  HASK  AND 

EB89 

39 

DSZMEM2  RTS 

{RETURN  TO  CALLER 

SUBROUTINE:  ROMAYRAH  OVERLAYS  ROH  TO  RAH  AND  RETURNS 

RAH  TO  TRUE  RAH  STATE  OVER  ENTIRE 
PROCESSOR  ADDRESS  SPACE 


EB9A 

CE  00  00 

RONLAYRAH 

LDX 

OXZERO 

{POINT  TO  LOU  HEHORY 

EBOD 

FF  BE  DO 

STX 

RAHSIZEL 

EB10 

CE  AO  00 

LDX 

■vnvwn 

{LAST  USER  RAH  ♦  l 

EB13 

FF  BE  DF 

STX 

RAHSIZEH 

EB16 

B&BE93 

ROHOVERRAH 

LDAA 

CRPIAA 

{ENABLE  ROH  TO  RAN  OVERLAY 

EB19 

8A  38 

ORAA 

0038H 

EB1B 

B7C0  49 

STAA 

IO+PIAAB+PIACRA 

EB1E 

BDEAB8 

JSR 

SIZEHEH 

{SIZE  HEHORY  AND  OVERLAY  RON  TO  RAN 

EB21 

BA  BE  95 

LDAA 

CRPIAA 

{RESTORE  PIA  A  TO  PREVIOUS  NODE 

EB24 

B7C0  49 

STAA 

IO+PIAAB+PIACRA 

{THIS  DISABLES  THE  ROH  TO  RAH  OVERLAY 
{PROCESS  AND  HAKES  RAH  LOOK  LIKE  RAH 

EB27 

CE  00  00 

LDX 

OXZERO 

{POINT  TO  LOU  HEHORY 

EB2A 

FF  BE  DO 

STX 

Rmsiza 

EB2D 

CE  CO  00 

LDX 

010 

{POINT  TO  LAST  RAH  ♦  1  (I/O  AREA) 

EB30 

FF  BE  OF 

STX 

RAHSIZEH 

EB33 

B0EAB8 

JSR 

SIZEHEH 

{SIZE  HEHORY  AGAIN  TO  SHOU  TRUE  RAH 

EB34 

39 

RTS 

{RETURN  TO  CALLER 

I 

I 

I 

;  SUBROUTINE!  INTPIAAB  INITIALIZE  PIA  A6  ACCORDING  TO  VALUES 
I  STORED  IN  SYSTEH  RAH  (COPIES  OF  THE 

j  CONTROL  REGISTERS) 


I 


EB37 

CE  C4  48 

INTPIAAB  LDX 

•IO+PIAAB 

{POINT  TO  PIA  . 

EB3A 

BA  BE  95 

LDAA 

CRPIAA 

{GET  CONTROL  UORD 

EB3D 

84  FB 

ANDA 

MFBH 

{ACCESS  DATA  DIRECTION  REGISTER 

EB3F 

A7  81 

STAA 

P.CRA,X 

EB41 

BABE9A 

LDAA 

CRPIAB 

EB44 

84  FB 

ANDA 

MFBH 

EB4A 

A7  83 

STAA 

P.CRB.X 

EB48 

CE  FF  FF 

LDX 

MFFFFH 

{HAKE  Ml  PIA  LUES  OUTPUTS 

EB4B 

FF  Cl  48 

STX 

ICKPIAAB+P.DDA 

EB4E 

FFC9  4A 

STX 

I0+PIAAB+P.DD8 

EB51 

CE  C9  48 

LDX 

IIO+PIAAB 

{POINT  TO  PIA 

EB54 

BA  BE  95 

LDAA 

CRPIAA 

{GET  CONTROL  UORD 

EB57 

8AM 

cm 

AA1U 

{ACCESS  PREIPHERAL  REGISTER 

EB59 

A7  II 

STAA 

P.CRA.X 

EB5B 

B6  BE  96 

LDM 

CRPIAB 

EB5E 

8AM 

ORM 

MIU 

■•in 

EBM 

A7  83 

STM 

P.CRB.X 

E662 

66  BE  BO 

LDAA 

SONARSLA 

{SELECT  A  SONAR 

E665 

A7  M 

STAA 

P.PRA.X 

EB67 

B6  BE  BE 

LDAA 

SONARSLB 

{SELECT  A  SONAR 

EB6A 

A7  12 

STM 

P.PRB.X 

EB6C 

39 

RTS  {RETURN  TO  CALLER 

SUBROUTINE:  INTPIACD  INITIALIZE  PIA  CO  ACCORDING  TO  VALUES 

STORED  IN  SYSTEM  RAN  (COPIES  OF  TK 
CONTROL  REGISTERS) 

EB6D 

CE  Cl  59 

NTPIACO  LDX 

•IO+PIACO 

{POINT  TO  PIA 

EB79 

B6  BE  97 

LDM 

CRPIAC 

{GET  CONTROL  WORD 

EB73 

84  FB 

ANDA 

MFBH 

{ACCESS  DATA  DIRECTION  REGISTER 

EB75 

A7I1 

STM 

P.CRC.X 

EB77 

66  BE  96 

LDM 

CRPIAD 

EB7A 

84  FB 

ANDA 

MFBH 

EB7C 

A7  #3 

STM 

P.CRD.I 

EB7E 

CEFFFF 

LDX 

MFFFFH 

{HAKE  ALL  PIA  LINES  OUTPUTS 

EB81 

FFCI5I 

STX 

IO+PIACD+P.DOC 

EB84 

FF  Cl  52 

STX 

IO+PIACD+P.DOO 

EB87 

CE  Cl  51 

LDX 

•IO+PIACO 

{POINT  TO  PIA 

EB8A 

B6  BE  97 

LDM 

CRPIAC 

{GET  CONTROL  WORD 

EB80 

8AM 

ORM 

filll 

IttIi 

{ACCESS  PREIPWRAL  REGISTER 

EB8F 

A7I1 

STM 

P.CRC.X 

EB91 

66  BE  98 

LDM 

CRPIAD 

EB94 

8AM 

ORM 

AAiU 

Wfl 

EB94 

A7I3 

STM 

P.CRD.X 

EB98 

66  BE  BF 

LDM 

SONARSLC 

{SELECT  A  SONAR 

EB9B 

A7M 

STM 

P.PRC.X 

EB90 

B6  BE  Cl 

LDM 

SONARSLD 

{SELECT  A  SONAR 

EBM 

A7I2 

STM 

P.PRD.X 

EBA2 

39 

RTS 

{RETURN  TO  CALLER 

1 

SUBROUTINE:  INTPTMAB  INITIALIZE  PTH  AB  FROH  VALUES  STORED 

1 

i 

IN  SYSTEM  RAH 

EBA3 

CE  Cl  18  ! 

INTPTMAB  LDX 

•IO+PTMAB 

{POINT  TO  PTH  AB 

EBA6 

B6  BE  84 

LDM 

CRPTHAB2 

{GET  CONTROL  WORD  FOR  TIMER  2 

EBA9 

A7  11 

STM 

PTHCR2.X 

EBAB 

B6  BE  85 

LDM 

CRPTNAB3 

{GET  CONTROL  WORD  FOR  TIMER  3 

EBAE 

A7M 

STM 

PTHCR3,X 

EBB9 

B6GE84 

LDM 

CRPTHAB2 

EBB3 

8AI1 

ORM 

M1H 

{POINT  TO  CONTROL  REGISTER  1 

EBBS 

A7  11 

STM 

PTHCR2.X 

EB67 

B6BE83 

LDAA 

CRPTNAB1 

;GET  CONTROL  WORD  FOR  TIMER  1 

EBBA 

A7  M 

STM 

PTNCRl.X 

E88C 

FE  BE  99 

LDX 

8CPTMA81 

s GET  BINARY  PRELOAD  VALUE  FOR  TIMER/COUNTER 

EB8F 

FFCI  1A 

STX 

IO+PTMAB+T . LATCH1 

EBC2 

FEBE9B 

LDX 

8CPTHAB2 

5 GET  BINARY  PRELOAD  VALUE  FOR  TIMER/ COUNTER 

EBC3 

FF  Cl  1C 

STX 

I0*PTHAB*T.LATCH2 

EBC8 

FE  BE  90 

LDX 

BCPTHAB3 

{GET  BINARY  PRELOAD  VALUE  FOR  TIIER/COUNTER 

EBCB 

FF  Cl  IE 

STX 

HHPTNAB+T.LATCH3 

EBCE 

39 

RTS 

{RETURN  TO  CALLER 

SUBROUTINE!  INTPTHCO  INITIALIZE  PTH  CD  FROM  VALUES  STORED 

IN  SYSTEM  RAH 

EBCF 

CECI2I 

NTPTMCD  LDX 

•IO+PTHCO 

{POINT  TO  PTM  CD 

EBD2 

B6  BE  87 

LDAA 

CRPTHCD2 

{GET  CONTROL  WORD  FOR  TIMER  2 

EBD5 

A7  11 

STM 

PTHCR2,X 

EBD7 

B6  BE  88 

LOM 

CRPTHCD3 

{GET  CONTROL  WORD  FOR  TIIER  3 

EBDA 

A7  M 

STM 

PTHCR3,X 

EBDC 

BA  BE  87 

LDM 

CRPTHC82 

EBDF 

8A  #1 

ORM 

HIM 

{POINT  TO  CONTROL  REGISTER  1 

EEE1 

A7  #1 

STM 

PTNCR2,X 

EBE3 

BA  BE  86 

LDM 

CRPTHC01 

{GET  CONTROL  WORD  FOR  TIIER  1 

EBE6 

A7  M 

STM 

PTNCRl.X 

EBE8 

FEBE9F 

LDX 

6CPTNC01 

{GET  BINARY  PRELOAD  VALUE  FOR  TIMER/COUNTER 

EBEB 

FF  Cl  22 

STX 

I0+PTMCDU.LATCH1 

EBEE 

FE  BE  At 

LDX 

BCPTHCD2 

{GET  BINARY  PRELOAD  VALUE  FOR  TIMER/COUNTER 

EBF1 

FF  Cl  24 

STX 

I0+PTHCD+T.LATCH2 

EBF4 

FEBE  A3 

LDX 

BCPTHCD3 

{GET  BINARY  PRELOAD  VALUE  FOR  TIMER/ COUNTER 

EBF7 

FFCI  26 

STX 

I0+PTNC0+T.LATCH3 

EBFA 

39 

RTS 

{RETURN  TO  CALLER 

SUBROUTINE!  INTPTHV  INITIALIZE  PTH  V  FROM  VALUES  STORED 

IN  SYSTEM  RAN 


EBFB 

CE  Cl  28 

INTPTHV 

LDX 

410+PT7P/ 

{POINT  TO  PTM  V 

EBFE 

B6BE8A 

LDM 

CRPTHV2 

{GET  CONTROL  WORD  FOR  TIMER  2 

Ecei 

A7I1 

STM 

PTMCR2,X 

EC93 

B6BE8B 

LDM 

CRPTHV3 

{GET  CONTROL  WORD  FOR  TIMER  3 

ECU 

A7  M 

STM 

PTMCR3,X 

EC98 

B6BE8A 

LDM 

CRPTMV2 

ECJB 

8AI1 

ORM 

•eiH 

{POINT  TO  CONTROL  REGISTER  i 

EC6D 

A7I1 

STM 

PTMCR2.X 

EC8F 

B6BE89 

LDM 

CRPTNVI 

{GET  CONTROL  WORD  FOR  TIIER  1 

EC12 

A7  M 

STM 

PTNCRl.X 

ECU 

FE  BE  A5 

LDX 

DCPTNV1 

{GET  BINARY  PRELOAD  VALUE  FOR  TIMER/COUNTER 

ECU 

FF  Cl  2A 

STX 

IO+PTHV+T.LATCHI 

EC1A 

FE  BE  A7 

LDX 

BCPTMV2 

{GET  BINARY  PRELOAD  VALUE  FOR  TIMER/COUNTER 

GET  BINARY  PRELOAD  VALUE  FOR  TIMER/COUNTER 


EC1D 

FFCI2C 

sn 

I0+PTHW.LATCH2 

EC2# 

FE  BE  A9 

LDI 

BCPTW3 

;CET  BINARY  PRELOAD  VALUE  FOR  TIHER/COUKTER 

EC23 

FFCf  2E 

sn 

IO+FTMV+T .  LATCK3 

EC26 

39 

RTS 

{RETURN  TO  CALLER 

SUBROUTINE!  iKTPTJF 

INITIALIZE  PTH  F  FROM  VALUES  STORED 

IN  SYSTEM  RAH 

EC27 

CE  Cl  31 

HTPTlf  LDI 

•KHPTTf 

{POINT  TO  PTH  F 

EC2A 

B6BE80 

LOAA 

CRPTHF2 

{GET  CONTROL  WORD  FOR  TIMER  2 

EC2D 

A7I1 

STAA 

PTHCR2,X 

EC2F 

16  IE  BE 

LOAA 

CRPTIF3 

{GET  CONTROL  WORD  FOR  TIMER  3 

EC32 

A7M 

STAA 

PTMCR3, X 

EC34 

66  BE  80 

LOAA 

CRPTIF2 

EC37 

8AI1 

ORAA 

HIM 

{POINT  TO  CONTROL  REGISTER  1 

EC39 

A7  11 

STAA 

PTHCR2, I 

EC38 

B6BE8C 

LOM 

CRPTHF1 

{GET  CONTROL  WORD  FOR  TIMER  1 

EC3E 

A7M 

STAA 

PTHCR1.1 

EC4# 

FE  BE  AB 

LOT 

BCPTIfl 

{GET  BINARY  PRELOAD  VALUE  FOR  TIMER/COUNTER 

EC43 

FF  Cl  32 

sn 

10+fTff+T.LATCHl 

EC46 

FEBE  AD 

UK 

BCPTIF2 

{GET  BINARY  PRELOAD  VALUE  FOR  TIMER/COUNTER 

EC49 

FF  Cl  34 

sn 

I0+PTHF+T.LATCH2 

EC4C 

FEBE  AF 

UK 

BCPTIF3 

GET  BINARY  PRELOAD  VALUE  FOR  TIMER/COUNTER 

EC4F 

FF  Cl  36 

sn 

IO+PTMF+T.LATCKJ 

EC32 

39 

RTS 

{RETURN  TO  CAULER 

SUBROUTINEl  IKTPTML 

INITIALIZE  PTH  L  FROM  VALUES  STORED 

IN  SYSTEM  RAM 

EC53 

CE  Cl  38 

NTPTHL  UK 

IIO+PTML 

{POINT  TO  PTH  L 

EC56 

B6BE9I 

LOM 

CRPTT12 

{GET  CONTROL  WORD  FOR  TIMER  2 

EC39 

A7I1 

STM 

PTHCR2,X 

EC5B 

B6BE91 

LOM 

CRPTML3 

{GET  CONTROL  WORD  FOR  TIMER  3 

EC5E 

A7N 

STM 

PTMCR3.X 

EC6I 

B6BE9I 

LOM 

CRPTH2 

EC63 

8AI1 

ORM 

N1H 

{POINT  TO  CONTROL  REGISTER  1 

EC65 

A7I1 

STM 

PTHCR2,X 

EC67 

B6BE8F 

LOM 

CRPTHL1 

{GET  CONTROL  WORD  FOR  TIMER  1 

EC6A 

A7H 

STM 

PTWCR1.X 

EC6C 

FE  BE  Bi 

UK 

BCPTHL1 

{GET  BINARY  PRELOAD  VALUE  FOR  TIMER/COUNTER 

EC6F 

FFCI3A 

sn 

I0+PTT1.+T .  LATCH1 

EC72 

FE  BE  B3 

UK 

8CPTHL2 

{GET  BINARY  PRELOAD  VALUE  FOR  TIMER/COUNTER 

EC7S 

FF  Cl  X 

sn 

I0+PTTUT.LATCH2 

EC78 

FE  BE  B5 

UK 

BCPTM.3 

{GET  BINARY  PRELOAD  VALUE  FOR  TIfER/ COUNTER 

EC7B 

FF  Cl  3E 

sn 

I0+PTJUT.LATCH3 

EC7E 

39 

RTS 

{RETURN  TO  CALLER 

I 


SUBROUTINE:  IMTPTMR 


INITIALIZE  PTM  R  FROM  VALUES  STORED 
IN  SYSTEM  RAH 


EC7F 

CECI  41  1 

NTPTMR  LDX 

IIO+PTHR 

{POINT  TO  PTM  R 

EC82 

86  BE  93 

LDAA 

CRPTWQ 

{GET  CONTROL  UORD  FOR  TIICR  2 

EC8S 

A7  11 

STAA 

PTHCR2.X 

EC87 

86  BE  94 

LDAA 

CRPTJH3 

{GET  CONTROL  UORD  FOR  TIICR  3 

EC8A 

A7  N 

STAA 

PTMCR3.X 

Eca 

B6  BE  93 

LDAA 

CRPTHQ 

EC8F 

BA  11 

ORAA 

MIH 

{POINT  TO  CONTROL  REGISTER  1 

EC91 

A7II 

STAA 

PTMCR2.X 

EC93 

E6  BE  92 

LDAA 

CRPTHN1 

{GET  CONTROL  UORD  FOR  TIICR  1 

EC96 

A7  M 

STAA 

PTHCRI.X 

EC99 

FE  BE  87 

LDX 

BCPTMRI 

{GET  BINARY  PRELOAD  VALUE  FOR  TIICR /COUNTER 

EC9B 

FF  CM2 

STX 

IO+PTHR+T.LATCH 

EC9E 

FE  BE  89 

LDX 

8CPTMR2 

{GET  BINARY  PRELOAD  VALUE  FOR  TIHER/COUNTER 

ECAI 

FF  Cl  44 

STX 

io^tmr+t.utch: 

ECA4 

FE  BE  88 

LDX 

BCPTKB 

{GET  BINARY  PRELOAD  VALUE  FOR  TIICR/COUNTER 

ECA7 

FF  Cl  46 

STX 

IO+PTMR+T.LATCH3 

ECAA 

39 

I 

RTS 

{RETURN  TO  CALLER 

SUBROUTINE:  INTACIAT  INITIALIZE  ACIAT  FROM  VALUES  STORED 

1 

1 

CE  CM!  1NTACIAT  LDX 

IN  SYSTEM  RAH 

ECAB 

IIO+ACIAT 

{POINT  TO  ACIA  T 

ECAE 

8613 

LDAA 

W3H 

ECB4 

A7M 

STAA 

ACIACR.X 

{RESET  THE  ACIA 

ECB2 

B6BE8I 

LDAA 

CRACIAT 

{GET  CONTROL  UORD  FOR  ACIA  T 

ECB5 

A7M 

STAA 

ACIACR.X 

ECB7 

A6I1 

LDAA 

ACIARX.X 

{THROW  AWAY  MY  OSH  ON  RECEIVE  LINE 

EC89 

39 

RTS 

{RETURN  TO  CALLER 

SUBROUTINE:  INTACIAX  INITIALIZE  ACIAX  FROM  VALUES  STORED 

IN  SYSTEM  RAM 


ECBA 
ECBD 
ECBF 
ECOI 
ECC4 
ECC6 
ECC8 

I 

I 

I 

5  SUBROUTINE:  INTACIAL  INITIALIZE  ACIAL  FROM  VALUES  STORED 

|  IN  SYSTEM  RAH 


CE  Cl  18  I 

NTACIAX  LDX 

•IO+ACIAX 

86  13 

LDAA 

•M3H 

A7  H 

STAA 

ACIACR.X 

86  BE  81 

LDAA 

CRACIAX 

A7M 

STAA 

ACIACR.X 

A6I1 

LDAA 

ACIARX.X 

39 

RTS 

{POINT  TO  ACIA  X 

{RESET  THE  ACIA 

{GET  CONTROL  WORD  FOR  ACIA  X 

{THROW  AWAY  ANY  TRASH  ON  RECEIVE  LINE 
{RETURN  TO  CALLER 


ECC9 

CEC8  M 

IMTACIAL  LDX 

•IO+ACIAL 

{POINT  TO  ACIA  L 

ECCC 

86  83 

LDAA 

•883H 

ECCE 

A7  88 

STAA 

ACIACR.X 

{RESET  THE  ACIA 

ECW 

B6  BE  82 

LDAA 

CRACIAL 

{GET  CONTROL  WORD  FOR  ACIA  L 

ECD3 

A7M 

STAA 

ACIACR.X 

ECUS 

A6  11 

LDAA 

ACIARY, K 

•THROU  AWAY  ANY  TRASH  W  RECEIVE  LINE 

ECD7 

39 

RTS 

•RETURN  TO  CALLER 

I 

I 


ECD8 

ED  EB  37 

I 

I 

INITPIA 

JSR 

INTPIAAB 

ECDB 

BD  EB  60 

JSR 

INTPIAtu 

ECCE 

39 

{ 

RTS 

ECDF 

BDEB  A3 

I 

INITPTH 

JSR 

INTPTHAB 

ECE2 

BD  EB  CF 

JSR 

INTPTMCD 

ECE5 

BD  EB  FB 

JSR 

INTPTHV 

ECE8 

BD  EC  27 

JSR 

INTPTMF 

ECEB 

BD  EC  53 

JSR 

INTPTML 

ECEE 

BDEC  7F 

JSR 

INTPTMR 

ECF1 

39 

• 

1 

RTS 

ECF2 

BDEC  AB 

I 

INITACIA  JSR 

INTACIAT 

ECF5 

BDEC  BA 

JSR 

INTACIAX 

ECF8 

BDECC9 

JSR 

IMTACIAL 

ECFB 

39 

I 

1 

5 

• 

1 

I 

RTS 

MAIN  INITIALIZATION  ROUTINE  ON  POWER  UP 

ECFC 

8F 

I 

INIT 

SEI 

{MASK  INTERRUPTS 

ECFD 

8EBE7F 

LDS 

IBOS 

{INITIALIZE  STACK  POINTER  FOR  SYSTEM 

EDM 

4F 

CLRA 

ED81 

43 

com 

ED82 

B7BEEE 

STAA 

INTMASK 

{INTERRUPTS  NOT  ALLOWED  UNTIL  INITIALIZATION 

ED05 

7FBEDC 

CLR 

POWERUP 

;WD  POWER  UP  COMPLETE 

ED68 

CEBFCA 

LDX 

•ADR 

{SET  UP  BLOCK  MOVE 

ED8B 

8E  BF  EF 

LDS 

•PREQ 

; (DESTINATION)  TO  INITIALIZE  USER  REGISTERS 

ED0E 

AF  88 

STS 

8,X 

{AND  SYSTEM  VECTORS 

EDie 

8E  FI  AB 

LDS 

•BL0CK1 

{POINT  TO  START  OF  BLOCK  DATA 

ED13 

AF  02 

STS 

2,X 

ED15 

8E  FI  BC 

LDS 

•BL0CK2 

{END  OF  BLOCK 

ED18 

flF  84 

STS 

4.X 

ED1A 

8E  BE  7F 

LDS 

•BOS 

{RESET  STACK  POINTER  TO  SYSTEM  STACK 

EC1D 

BD  E6  46 

JSR 

MOVE! 

{DO  BLOCK  MOVE 

ED20 

CEBFCA 

LDX 

•ADR 

{SET  UP  BLOCK  HOVE 

{RESET  STACK  POINTER  TO  SYSTEM  STACK 
;DO  BLOCK  MOVE 
{SET  UP  BLOCK  HOVE 


(T 


ED23 

8E 

BE 

80 

LBS 

•CRACIAT 

ED26 

(f 

M 

STS 

M 

ED28 

BE 

FI 

BC 

LDS 

4BL0CK2 

ED2B 

(f 

02 

STS 

2,X 

ED2D 

BE 

F2 

4A 

LDS 

•BL0CK3 

ED30 

tf 

04 

STS 

4,X 

ED32 

8E 

BE 

7F 

LDS 

•BOS 

ED35 

BD 

E6 

46 

JSR 

H0VE1 

ED33 

8E 

BE 

7F 

LDS 

•BOS 

ED38 

BO 

EC 

06 

INIT2  JSR 

INITPIA 

ED3E 

8E 

BE 

7F 

LDS 

•BOS 

ED41 

BD 

EC 

DF 

JSR 

INITPTM 

ED44 

8E 

BE 

7F 

LDS 

•BOS 

ED47 

BD 

EC 

F2 

JSR 

INITACIA 

ED*' 

8E 

BE 

7F 

LDS 

•BOS 

EL4  J 

BD 

EB 

OA 

JSR 

ROMLAYRAH 

EDS? 

8E 

BE 

7F 

LDS 

•BOS 

ED53 

C6 

53 

LDAB 

N55H 

ED55 

F7 

BE 

DC 

STAB 

POWERUP 

ED53 

7F 

BE 

EE 

DONEPOWUP  CLR 

INTMASK 

ED5B 

BE 

ai 

ED5C 

7E 

El 

EF 

JMP 

START 

(DESTINATION)  10  INITIALIZATION  PARAMETERS 
POINT  TO  START  OF  BLOCK  DATA 
END  OF  BLOCK 

RESET  STACK  POINTER  TO  SYSTEM  STACK 
DO  BLOCK  HOVE 

RESET  STACK  POINTER  TO  SYSTEM  STACK 
INITIALIZE  PIA'S 

RESET  STACK  POINTER  TO  SYSTEM  STACK 
[INITIALIZE  PTN'S 

[RESET  STACK  POINTER  TO  SYSTEM  STACK 
[INITIALIZE  ACIA'S 

[RESET  STACK  POINTER  TO  SYSTEM  STACK 
[SIZE  MEMORY  AND  OVERLAY  ROM  TO  RAH 
[RESET  STACK  POINTER  TO  SYSTEM  STACK 

[Power  up  is  amoE 

[NO  INTERRUPT  MASK  REQUIRED  NON  SO 

[CLEAR  INTERRUPT  MASK 

[GO  TO  PROTO  PORTION  OF  OPERATING  SYSTEM 


SUBROUTINE:  SCNPRINT 


ON  ENTRY  THE  A  REGISTER  MS  TIC  VALUE  TO  PRINT  AS  A 
NUMBER  FROM  0  TO  25.5 

THE  X  REGISTER  POINTS  TO  THE  ADDRESS  WHERE  4  ASCII  BYTES 
WILL  BE  PLACED  AS  A  DECIMfl.  REPRESENTATION  OF  T)C  VALUE 
IN  THE  A  REGISTER.  ACTUAL  PRINTING  IS  PERFORMED  BY 
SOME  OTHER  ROUTINE. 


ED5F 

FFBF7E 

SONPRINT  STX 

LSXTEMP 

{SAVE  POINTER  TO  PRINT  BUFFER 

ED62 

CEED  AB 

LDX 

•LOOKS'* 

{GET  STARTING  ADDRESS  OF  LOOKUP  TABLE 

ED65 

FF  BF  7C 

STX 

LKSONTfP 

.{SAVE  IT  IN  A  WORKING  TEMr  REGISTER 

ED68 

48 

ASIA 

;IF  VALUE  OF  A  REGISTER  IS  ABOVE  127 

ED69 

25  28 

BCS 

SPA128 

{ADD  512  TO  LOOKUP  POINTER  ELSE 

ED6B 

48 

SP1 

ASIA 

;IF  VALUE  OF  A  REGISTER  WAS  ABOVE  64 

ED6C 

25  31 

BCS 

SPAM 

{ADD  256  TO  LOOKUP  POINTER  ELSE 

ED6E 

5F 

SP2 

CLRB 

{ADD  REMAINING  VALUE  OF  A  REGISTER  TO 

ED6F 

BBBF7D 

ADDA 

LKSONTfP+I 

{LOOKUP  POINTER 

ED72 

B7  BF  7D 

STAA 

LKSONTMP+I 

ED75 

F9  BF  7C 

ADCB 

USONTMP 

{LOOKUP  POINTER  NOW  POINTS  4*A  BYTES 

ED78 

F7  BF7C 

STAB 

LKSONTMP 

{INTO  THE  LOOKUP  TABLE 

ED7B 

C6  04 

LDAB 

•04H 

{SET  UP  TO  TRANSFER  TO  PRINT  BUFFER 

ED7D 

FE  BF  7C 

SP3 

LDX 

LKSONTMP 

{FOUR  ASCII  BYTES 

ED80 

MOO 

LDAA 

M 

{GET  A  BYTE 

A-42 


■"-  *  «TT  r.  TJT;  rr>T  ‘ 


ED82 

I  NX 

ED33 

FF 

BF 

7C 

STX 

LKSONTtP 

ED86 

FE 

BF 

7E 

LDX 

LSXTEHP 

ED89 

A7 

66 

STAA 

M 

ED8B 

66 

INX 

ED8C 

FF 

BF 

7E 

STX 

LSXTEHP 

ED8F 

5A 

DECB 

ED99 

26 

EB 

RE 

SP3 

ED72 

39 

RTS 

ED93 

36 

SPA128 

PSHA 

ED94 

86 

62 

LDAA 

M2H 

ED96 

BB 

BF 

7C 

ADDA 

LKSONTff 

ED99 

B7 

BF 

7C 

STAA 

LKSONTHP 

ED9C 

32 

PULA 

ED9D 

26 

CC 

BRA 

SPI 

ED9F 

36 

SPA64 

PSM 

EDA# 

86 

61 

LDAA 

•9IH 

EDA2 

BB 

BF 

7C 

ADDA 

LKSONTHP 

EDA5 

B7 

BF 

7C 

STAA 

LKSONTHP 

EDA8 

32 

PULA 

EDA9 

26 

C3 

5 

BRA 

SP2 

EDAB 

26 

36 

26 

29 

• 

LOOKSON 

FCC 

'  6  ' 

EDAF 

26 

39 

2E 

31 

FCC 

'  6.1' 

EDB3 

26 

36 

2E 

32 

FCC 

'  6.2’ 

EDB7 

26 

39 

2E 

33 

FCC 

'  6.3' 

EDBB 

26 

39 

2E 

34 

FCC 

'  6.4' 

EDBF 

26 

36 

2E 

35 

FCC 

’  6.5' 

EDC3 

26 

39 

2E 

36 

FCC 

’  6.6' 

EDC7 

26 

39 

2E 

37 

FCC 

'  6.7' 

EDCB 

26 

36 

2E 

38 

FCC 

'  6.8' 

EDCF 

26 

36 

2E 

39 

FCC 

’  6.9' 

EDD3 

26 

31 

2E 

39 

FCC 

'  1.6’ 

EDD7 

26 

31 

2E 

31 

FCC 

'  1.1' 

EDDB 

26 

31 

2E 

32 

FCC 

'  1.2' 

EDDF 

26 

31 

2E 

33 

FCC 

'  1.3' 

EDE3 

26 

31 

2E 

34 

FCC 

'  1.4’ 

EDE7 

26 

31 

2E 

35 

FCC 

'  1.5' 

EDEB 

29 

31 

2E 

36 

FCC 

'  1.6' 

EDEF 

26 

31 

2E 

37 

FCC 

'  1.7' 

EDF3 

26 

31 

2E 

38 

FCC 

’  1.8' 

EDF7 

29 

31 

2E 

39 

FCC 

'  1.9* 

EDFB 

29 

32 

2E 

39 

FCC 

’  2.6’ 

EDFF 

29 

32 

2E 

31 

FCC 

'  2.1' 

EE63 

29 

32 

2E 

32 

FCC 

'  2.2' 

EE97 

29 

32 

2E 

33 

FCC 

'  2.3' 

EE0B 

26 

32 

2E 

34 

FCC 

'  2.4' 

EE0F 

29 

32 

2E 

35 

FCC 

'  2.5' 

EE13 

29 

32 

2£ 

36 

FCC 

’  2.6' 

EE17 

29 

32 

2E 

37 

FCC 

'  2.7' 

EE1B 

29 

32 

2E 

38 

FCC 

'  2.8' 

{POINT  TO  NEXT  BYTE  IN  TABLE 

{SAVE  TABLE  POINTER 

{GET  PRINT  BUFFER  POINTER 

{PUT  ASCII  CHARACTER  INTO  PRINT  BUFFER 

{POINT  TO  NEXT  POSITKN  OF  PRINT  BUFFER 

{SAVE  PRINT  BUFFER  POINTER 

{ONE  LESS  BYTE  TO  GO 

{LOOP  BACK  IF  NOT  THRU  WITH  FOUR  BYTES 

{ELSE  RETURN  TO  C«±ER 

{SAVE  VALUE  TO  BE  FRINTED 

{ADD  512  TO  INDEX  POINTING  INTO  THE  PRINT  TABLE 

{SAVE  THE  POINTER 

{RESTORE  VALUE  TO  BE  PRINTED 

{CONTINUE  FINDING  INDEX  INTO  PRINT  TABLE 

{SAVE  VALUE  TO  BE  PRINTED 

{ADD  256  TO  INDEX  POINTING  INTO  THE  PRINT  TABLE 


{RESTORE  VALUE  TO  BE  PRINTED 
{CONTINUE  FINDING  INDEX  INTO  PRINT  TABLE 


{SONAR  HEX  TO  ASCII  DECIMAL  LOOKUP  TABLE 


A-43 


p 

k 

ft  1 

*-  *  —  —  —  *-  —  * 

r 1 

; 

i 

» 

i 

EE1F 

21  32  2E  39 

FCC 

*  2.9' 

n 

EE23 

21  33  2E  39 

FCC 

'  3.9' 

EE27 

21  33  2E  31 

FCC 

'  3.1' 

k 

E28 

29  33  2E  32 

FCC 

'  3.2' 

tv 

EE2F 

29  33  2E  33 

FCC 

'  3.3' 

E33 

29  33  2E  34 

FCC 

'  3.4' 

i 

E37 

29  33  2£  35 

FCC 

'  3.5' 

E38 

29  33  2E  36 

FCC 

'  3.6' 

1 

EE3F 

29  33  2E  37 

FCC 

'  3.7' 

E43 

29  33  2E  38 

FCC 

'  3.8' 

E47 

29  33  2E  39 

FCC 

'  3.9* 

E4B 

29  34  2E  39 

FCC 

'  4.9' 

E4F 

29  34  2£  31 

FCC 

'  4.1' 

|R  ' 

EE53 

29  34  2E  32 

FCC 

'  4.2' 

m 

EE57 

29  34  2E  33 

FCC 

'  4.3' 

» 

-  1 

E3B 

29  34  2E  34 

FCC 

'  4.4' 

t 

EE5F 

29  34  2E  35 

FCC 

'  4.5' 

E63 

29  34  2E  36 

FCC 

'  4.6' 

E67 

29  34  2E  37 

FCC 

'  4.7' 

^  l 

l 

E68 

29  34  2E  38 

FCC 

'  4.8' 

E6F 

29  34  2E  39 

FCC 

'  4.9* 

*  ■ 
v*  1 

EE73 

29  35  2E  39 

FCC 

'  3.9' 

EE77 

29  35  2E  31 

FCC 

'  5.1' 

EE7B 

29  35  2E  32 

FCC 

'  5.2' 

‘  -X. 

»*■ , 

EE7F 

29  35  2E  33 

FCC 

'  3.3* 

i  r 

L"  • 

E83 

29  3S2E34 

FCC 

'  5.4' 

E87 

29  35  2E  37 

FCC 

'  5.5' 

E8B 

29  35  2E  36 

FCC 

'  5.6' 

E0F 

29  35  2E  37 

FCC 

'  5.7' 

[•; 

E93 

29  35  2E  38 

FCC 

'  S.V 

r:-i 

E97 

29  35  2E  39 

FCC 

'  5.9' 

all 

E9B 

29  36  2E  39 

FCC 

'  6.9' 

■  > 

E9F 

29  36  2E  31 

FCC 

'  6.1' 

‘k  t 

EEA3 

29  36  2E  32 

FCC 

'  6.2' 

S:1 

EA7 

29  36  2E  33 

FCC 

'  6.3' 

•*  f 

■--■1 
-  *  i 

EAB 

29  36  2E  34 

FCC 

'  6.4' 

EEAF 

29  36  2E  35 

FCC 

'  6.5' 

.•  < 
j 

EB3 

29  36  2E  36 

FCC 

'  6.6' 

S-; 

EEB7 

29  36  2E  37 

FCC 

'  6.7' 

EEBB 

29  36  2E  38 

FCC 

'  6.8' 

“ , 

EEBF 

29  36  2E  39 

FCC 

'  6.9* 

EC3 

29  37  2E  39 

FCC 

'  7.9' 

EC7 

29  37  2E  31 

FCC 

'  7.1' 

ir 

ECB 

29  37  2E  32 

FCC 

'  7.2' 

JL. 

EE 

29  37  2E  33 

FCC 

'  7.3' 

►  ,* 

ED3 

29  37  2E  34 

FCC 

'  7.4' 

►  .** 

EED7 

29  37  2E  35 

FCC 

'  7.5' 

EDB 

29  37  2E  36 

FCC 

'  7.6' 

EEDF 

29  37  2E  37 

FCC 

'  7.7' 

ft' 

EE3 

29  37  2E  38 

FCC 

'  7.8' 

j ! 

EEE7 

29  37  2E  39 

FCC 

'  7.9' 

si 
.  •  • 

EEB 

29  38  2E  39 

FCC 

'  8.9' 

Si 

& 

ft-44 

1 

EFBF 

31  33  2E  33 

FCC 

*1  3.3' 

EFC3 

31  33  2E  34 

FCC 

'13.4' 

EFC7 

31  33  2E  35 

FCC 

M3. 5' 

EFC8 

31  33  2E  36 

FCC 

'13.4* 

EFCF 

31  33  2E  37 

FCC 

*13.7' 

EFD3 

31  33  2E  38 

FCC 

M3.8' 

EFD7 

31  33  2E  39 

FCC 

'13.9* 

EFDB 

31  34  2E  31 

FCC 

*14.0* 

EFDF 

31  34  2£  31 

FCC 

‘14.1* 

EFE3 

31  34  2E  32 

FCC 

*14.2* 

EFE7 

31  34  2E  33 

FCC 

*14.3* 

EFEB 

31  34  2E  34 

FCC 

*14.4* 

EFEF 

31  34  2E  35 

FCC 

*14.5' 

EFF3 

31  34  2E  36 

FCC 

*14.4* 

EFF7 

31  34  2E  37 

FCC 

*14.7* 

EFFfc 

31  34  2E  38 

FCC 

*14.8* 

EFFF 

31  34  2E  39 

FCC 

*14.9* 

F803 

31  35  2E  31 

FCC 

*  15.8* 

FM7 

31  35  2E  31 

FCC 

*15.1* 

F80B 

31  35  2E  32 

FCC 

*15.2* 

FMF 

31  35  2E  33 

FCC 

*15.3* 

F613 

31  35  2E  34 

FCC 

'15.4' 

F017 

31  35  2E  35 

FCC 

*15.5* 

FI1B 

31  35  2E  36 

FCC 

*15.6* 

F01F 

31  35  2E  37 

FCC 

*15.7* 

F023 

31  35  2E  38 

FCC 

*15.8* 

F027 

31  35  2E  39 

FCC 

'15.9* 

F02B 

31  36  2E  31 

FCC 

*16.8' 

F82F 

31  36  2E  31 

FCC 

*16.1* 

F833 

31  36  2E  32 

FCC 

*16.2* 

F837 

31  36  2E  33 

FCC 

*16.3* 

F03B 

31  36  2E  34 

FCC 

*16.4* 

F03F 

31  36  2E  35 

FCC 

'16.5' 

F6<3 

31  36  2E  36 

FCC 

*16.6' 

F047 

31  36  2E  37 

FCC 

*16.7* 

FMB 

31  36  2E  38 

FCC 

*16.8* 

FMF 

31  36  2E  39 

FCC 

*16.9' 

F853 

31  37  2E  31 

FCC 

'17.8* 

F057 

31  37  2E  31 

FCC 

'17.1' 

F05B 

31  37  2E  32 

FCC 

*17.2* 

F05F 

31  37  2E  33 

FCC 

*17.3' 

F063 

31  37  2E  34 

FCC 

'17.4* 

F067 

31  37  2E  35 

FCC 

*17.5' 

FMB 

31  37  2E  36 

FCC 

*17.6' 

F06F 

31  37  2E  37 

FCC 

'17.7* 

F073 

31  37  2E  38 

FCC 

*17.8’ 

F077 

31  37  2E  39 

FCC 

*17.9* 

F07B 

31  38  2E  30 

FCC 

*18.8' 

F07F 

31  38  2E  31 

FCC 

*18.1* 

F083 

31  33  2E  32 

FCC 

'18.2' 

F087 

31  38  2E  33 

FCC 

*18.3' 

FMB 

31  38  2E  34 

FCC 

*18.4* 

F15F 

32 

33 

2E 

37 

FCC 

'23.7' 

F163 

32 

33 

2E 

38 

FCC 

'23.8' 

F167 

32 

33 

2E 

39 

FCC 

'23.9' 

F16B 

32 

34 

2E 

38 

FCC 

'24.8' 

F16F 

32 

34 

2E 

31 

FCC 

'24.1' 

F173 

32 

34 

2E 

32 

FCC 

'24.2' 

F177 

32 

34 

2E 

33 

FCC 

'24.3' 

F17B 

32 

34 

2E 

34 

FCC 

'24.4' 

F17F 

32 

34 

2E 

35 

FCC 

'24.5' 

F183 

32 

34 

2E 

36 

FCC 

'24.6' 

F187 

32 

34 

2E 

37 

FCC 

'24.7' 

F188 

32 

34 

2E 

38 

FCC 

'24.8' 

F18F 

32 

34 

2E 

39 

FCC 

'24.9' 

F193 

32 

35 

2E 

31 

FCC 

'25.8' 

F197 

32 

35 

2E 

31 

FCC 

'25.1' 

F19B 

32 

35 

2E 

32 

FCC 

'25.2' 

F19F 

32 

35 

2E 

33 

FCC 

'25.3' 

F1A3 

32 

35 

2E 

34 

FCC 

'25.4' 

F1A7 

32 

35 

2E 

35 

FCC 

'25.5' 

BLOCKS  FOR  INCLUSION  WITH  HARRS-1  OPERATING  SYSTEM  RON 


F1AB 

El  EF 

BLOCK 1 

FOB  START 

F1AD 

BEN 

FOB  USRSTAK 

F1AF 

E2  A8 

FOB  SWI38 

F1B1 

El  FB 

FBB  ACIAA 

F1B3 

7E 

FCB  87EH 

F1B4 

E9  84 

FD8  TICHAN 

F1B6 

7E 

FCB  87EH 

F1B7 

E2  95 

FBB  SWIHAN 

F1B9 

7E 

FCB  87SH 

F1BA 

El  F8 

1 

FOB  BREAK 

F1BC 

15 

1 

BL0CK2 

FCB  15H 

;COPY  OF  CONTROL  REGISTER  BYTE  FOR  ACIAT 

F1BD 

15 

FCB  15H 

;  COPY  OF  CONTROL  REGISTER  BYTE  FOR  ACIAI 

F1BE 

15 

1 

FCB  15H 

;COPY  OF  CONTROL  REGISTER  BYTE  FOR  ACIAL 

F1BF 

88 

I 

FCB8H 

;COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTMAB1 

F1C8 

88 

FCB  8H 

{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTHAB2 

F1C1 

88 

FCB  888H 

{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTMAB3 

F1C2 

88 

FCB  8H 

{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTHCD1 

F1C3 

88 

FCB  8H 

{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTMCD2 

F1C4 

88 

FCB  8H 

{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTHC03 

F1C5 

88 

FCB  m\ 

{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTNV1 

F1C6 

88 

FCB  888H 

{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTMV2 

F1C7 

88 

FCB8H 

{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTHV3 

A-48 


F1C8 

41 

FC8  444H 

;COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTTF1 

FIC9 

44 

FC8  444H 

[COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTNF2 

F1CA 

44 

FC8  4H 

{COPY  OF  CONTROL  REGISTER  BYTE  'OR  PTTF3 

F1CB 

41 

FC8  444H 

{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTMLI 

ficc 

44 

FCB  440H 

{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTPL2 

F  ICO 

44 

FC8  4H 

{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTH3 

F1CE 

44 

FCB  444N 

{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTHRl 

F1CF 

44 

FCB  444H 

{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTTR2 

F104 

44 

FCB  4H 

1 

{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTNR3 

F1D1 

F5 

1 

FCB  4F5H 

{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PIM 

F1D2 

44 

FCB  44H 

{COPY  OF  CONTROL  REGISTER  BYTE  FOR  P1AB 

F1D3 

44 

FCB  44H 

{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PIAC 

F1D4 

44 

FCB  44H 

1 

{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PIAD 

FIDS 

FFF6 

l 

FD8  4FFF6H 

{BINARY  COUNT  PRELOAD  FOR  PTMABl 

F1D7 

FFFA 

FD6  4FFF6H 

{BINARY  COUNT  PRELOAD  FOR  PTMA82 

F1D9 

44  24 

FD6  44424H 

{BINARY  COUNT  PRELOAD  FOR  PTHAB3 

Fine 

FFF4 

FDB4FFF6H 

{BINARY  COUNT  PRELOAD  FOR  PTNCD1 

FIDO 

FFF4 

FD8  4FFF4H 

{BINARY  COUNT  PRELOAD  FOR  PTNCD2 

F1DF 

FFFF 

FDB4FFFFH 

{BINARY  COUNT  PRELOAD  FOR  PTMCD3 

F1E1 

52  47 

FDB  45247H 

{BINARY  COUNT  PRELOAD  FOR  PTHV1 

F1E3 

52  47 

FDB  45247H 

{BINARY  COUNT  PRELOAD  FOR  PTNV2 

F1ES 

FFFF 

FDB  4FFFFH 

{BINARY  COUNT  PRELOAD  FOR  PTIW3 

F1E7 

44  43 

FDB  44443H 

{BINARY  COUNT  PRELOAD  FOR  PTPFI 

FIR 

44  43 

FDB  44443H 

{BINARY  COUNT  PRELOAD  FOR  PTTF2 

F1EB 

FFFF 

FDB  4FFFFH 

{BINARY  CaNT  PRELOAD  FOR  PTNF3 

F1ED 

44  3F 

FDB  4443FH 

{BINARY  COUNT  PRELOAD  FOR  PDLl 

FIEF 

44  3F 

FDB  4443FH 

{BINARY  COUNT  PRELOAD  FOR  PTNL2 

F1F1 

FFFF 

FDB  4FFFFH 

{BINARY  COUNT  PRELOAD  FOR  PTHL3 

F1F3 

44  if 

FDB  4W3FH 

{BINARY  COUNT  PRELOAD  FOR  PTMR1 

F1F3 

44  3F 

FDB  4443FH 

{BINARY  COUNT  PRELOAD  FOR  PTMR2 
{BINARY  COUNT  PRELOAD  FOR  PTNR3 

FiF7 

FFFF 

FDB  4FFFFH 

! 

F1F? 

41 

1 

FCB41H 

{SONAR  SELECT  BYTE  WRITTEN  TO  PIA  A 

FIFA 

41 

FCB  41H 

{SONAR  SELECT  BYTE  WRITTEN  TO  PIA  B 

F1FB 

41 

FCB  41H 

{SONAR  SELECT  BYTE  WRITTEN  TO  PIA  C 

FIFO 

41 

FCB  41H 
t 

{SONAR  SELECT  BYTE  WRITTEN  TO  PIA  D 

FIFO 

12 

l 

FCB  412H 

{LAST  SONAR  A  READING 

FIFE 

12 

FCB  412H 

{LAST  SONAR  B  READING 

F1FF 

12 

FCB  412H 

{LAST  SONAR  C  READING 

F244 

12 

FCB  412H 

1 

{LAST  SONAR  D  READING 

F241 

44  44 

! 

FDB  4444H 

1 

FCB  439H 

{TIC  TIME  OF  LAST  SONAR  READING 

F203 

34 

{JUMP  VECTOR  FOR  EXTENDED  TIC  INTERRUPT 

{ROUTUC  (PRESQiTLY  SET  TO  RTS) 


F244 

•1  41 

FOB  44141H 

F246 

44 

J 

FOB  444H 

{TINE  ZERO  FROM  DRIVE  COMPUTER  (15  BCD  1$  NIBBLES) 

F247 

44 

FCB  444H 

F246 

44 

FOB  444H 

F249 

44 

FCB  444H 

F24A 

42 

FCB  442H 

F29B 

4A 

FCB  44AH 

F24C 

49 

FCB  44SH 

F24D 

44 

FCB  444H 

F24E 

41 

FCB  441H 

F26F 

42 

FCB  442H 

F2lt 

41 

FCB  441H 

F2U 

44 

FCB  444H 

F212 

46 

FCB44QH 

F213 

49 

FCB  449H 

F214 

41 

FCB441H 

F215 

44  44 

i 

m  44444H 

(ONE  TENTH  SECOND  TIC  TINE  COUNT  SINCE  TINE  ZERO 

F217 

48 

1 

FCB  448H 

{OFFSET  INTO  I/O  AREA  FOR  PORT  INITIALIZATION 

F218 

44 

l 

FCB  444H 

{POUERUPNOT  COMPLETE 

F21? 

44  44 

l 

FOB  44444H 

{START  OF  RAN 

F21B 

C4  44 

FB6  10 

;END  OF  RAN  ♦  1  (I/O  AREA) 

F21D 

59 

FC8  455H 

{CHANGE  SELECTED  SONARS  IF  44  ELSE  INTERRUPT 

{HANDLER  SETS  THIS  BYTE  TO  455H 

F21E 

41 

FCB441H 

{NEXT  SONAR  SELECT  BYTE  WRITTEN  TO  PIA  A 

F21F 

41 

FCB  441H 

{NEXT  SONAR  SELECT  BYTE  WRITTEN  TO  PIA  B 

F224 

41 

FCB441H 

{NEXT  SONAR  SELECT  BYTE  WRITTEN  TO  PIA  C 

F221 

41 

FCB441H 

{TEXT  SONAR  SELECT  BYTE  WRITTEN  TO  PIA  D 

F222 

44  44 

FOB  4 

{TICTEHP4  TEMPORARY  REGISTER  FOR  TIC  INTERRUPT 

F224 

44  44 

FDB  4 

{TICTEMP1  TEMPORARY  REGISTER  FOR  TIC  INTERRUPT 

F224 

44  44 

FOB  4 

{TICTEHP2  TEMPORARY  REGISTER  FOR  TIC  INTERRUPT 

F228 

44  44 

FDB  4 

{TICTEMP3  TEMPORARY  REGISTER  FOR  TIC  INTERRUPT 

F22A 

FF 

FCB  4FFH 

{INTMASK  INTERRUPTS  MASKED  IF  IFF  aSE  NOT  MASKED  IF  444 

F22B 

44 

FCB  4 

{SONDATSA  SONtt  SELECT  BYTE  FROM  READSONAR  ROUTINE 

F22C 

44 

FCB  4 

{SONDATRA  SONAR  READING  FROM  READSONAR  ROUTINE 

F22D 

44 

FCB  4 

{SONDATSB  SONAR  SELECT  BYTE  FROM  READSONAR  ROUTUC 

F22E 

44 

FCB  4 

{SONDATRB  SONAR  READING  FROM  READSONAR  ROUTINE 

F22F 

44 

FCB  4 

{SONDATSC  SONAR  SEECT  BYTE  FROM  READSONAR  ROUTINE 

F230 

44 

FCB  4 

{SONDATRC  SONAR  READING  FROM  READSONAR  ROUTINE 

F231 

44 

FCB  4 

{SONDATSD  SONAR  SELECT  BYTE  FROM  READSONAR  ROUTUC 

F232 

44 

FCB  4 

{SONDATRD  SONAR  READING  FROM  READSONAR  ROUTINE 

F233 

44  49 

FDB  4649H 

{FVCOUNT  FRONT  WHEEL  ABSOLUTE  COLWT  FOR  STRAIGHT  AHEAD 

F235 

44  44 

FDB  4 

jRWCOUNTI  RIGHT  VHEEL  PTM  COUNTER  1  COUNTS 

F237 

44  44 

FDB  4 

{RMC0WT2  RIGHT  WHEa  PTM  COUNTER  2  COUNTS 

F239 

44  44 

FDB  4 

{LWC0UNT1  LEFT  W&L  PTM  COUNTER  I  COUNTS 

F23B 

44  44 

FDB  4 

{LWC0JNT2  LEFT  WHEa  PTM  COUNTER  2  COUNTS 

F230 

44 

FCB  4 

{RWMODl  RIGHT  WHEa  PTM  1  MODULO  COUNT 

A-54 


F23C 

44 

FC8 

• 

{RWM002  RIGHT  IKEL  PTH  2  MODULO  COUNT 

F23F 

H 

FC8 

• 

;LUriODi  LEFT  14CEL  PTH  1  MODULO  COUNT 

F244 

M 

FC8 

• 

{LHH0D2  LEFT  WE  PTH  2  MODULO  COUNT 

F241 

71 

FCB 

47EH 

F242 

•1  44 

FD6 

44144N 

{JUMP  VECTOR  FOR  C  (COU)  STWT)  COftWO 

F244 

7E 

FCB 

47EH 

F245 

91  13 

FDB 

W43H 

{JUMP  VECTOR  FOR  U  (WARM  START)  COftYWD 

F247 

71 

FCB 

47EH 

F248 

24  41 

FDB 

42*41H 

?  JUMP  VECTOR  FOR  0  (OOESSEY)  COftWO 

F24A 

•1 

8L0CX3  HOP 

{HARK  END  OF  BLOCK  2 

1 

i 


FF44 

1 

1 

0RG4FF44H 

;  HARRS- 1  SYSTEM  CREDIT  AREA 

FF44 

40  41  52  52 

FCC  ' HARRS -1  CREATORS' 

FF44 

53  2D  31  24 

FF46 

43  52  45  4! 

F4C 

54  4F  52  53 

F14 

31  4C  54  24 

FCC  '1LT  RAfOALL  OMEN' 

FF14 

52  41  4E  44 

FF18 

41  4C4C24 

FFIC 

4F  57  45  4E 

FF24 

43  41  54  54 

FCC  'CAPT  ' 

FF24 

24  24  21  24 

F28 

24  24  24  24 

FF2C 

24  24  24  24 

FF34 

24  24  42  45 

FCC  '  BERT  ' 

FF34 

52  54  24  24 

F38 

24  24  24  24 

F3C 

24  24  24  24 

F44 

24  24  24  24 

FCC  '  SQICIDER  ' 

F44 

53  43  48  4E 

F48 

45  49  44  45 

F4C 

52  24  24  24 

FF54 

31  4C  54  24 

FCC  MLTTOH  CLIFFORD' 

FF54 

54  4F  40  24 

F58 

43  4C  49  44 

FF5C 

44  4F  52  44 

FFF5 

ORO  4FFF5H 

{RESET  VECTOR  AREA 

FFF5 

7EECFC 

LASTCH 

JHP  INIT 

{LAST  CHANCE  FOR  RECOVERY 

FF8 

BF  F7 

SYSIRQ 

FDB  IROVEC 

{  •  FOR  MASKABLE  INTERRUPT  REQUEST 

FFA 

BF  FA 

SYSSWI 

FDB  SNIVEC 

5  *  FOR  SOFTWARE  INTERRUPT  REQUEST 

FFC 

BF  FD 

SYSfOI 

FDB  MIVEC 

{  1  FOR  NONMASKABLE  IRQ 

FFFE 

EC  FC 

RESETV 

FDB  INIT 

;  *  FOR  MASTER  AND  POWER  ON  RESET 

l 


aaaa 

Wf 


No  error!*) 
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SYMBOL  TABLE  FOR  FILE  NAVROH.A 


A.C 

MM 

A.L 

Mil 

A.RX 

Mil 

A.S 

MM 

A.T 

Ai&A 

fvvf 

A.TX 

Mil 

A.X 

AA AO 
•WO 

M 

•Ml 

A1 

•M2 

A2 

MM 

A3 

AAJW) 

wvg 

A4 

Mil 

AS 

M2I 

A6 

MM 

A7 

MM 

ABORT 

E287 

AC1AA 

E1FB 

AC1ACR 

MM 

ACIAI 

BFF5 

ACIAL 

Mil 

ACIARX 

•Ml 

AC1ASTAT 

MM 

AC  I  AT 

MM 

ACIATX 

•Ml 

ACIAX 

iAAO 

•WO 

AOOAB 

E71C 

AD0ABX1 

E718 

ADCH 

BFCC 

AOOL 

BFCC 

ADDRS 

E635 

ADDZ 

E731 

ADR 

BFCA 

ALPHJrt 

E815 

AMCTOK 

£831 

AMU! 

E329 

ANOK 

E82S 

ANRTS 

E833 

ARE6 

BFEC 

ASCI IL 

E7EC 

ASCIIR 

E7FI 

ASCRTS 

E7FA 

B# 

Mil 

B1 

•M2 

B2 

MM 

B3 

MM 

B4 

Mil 

BS 

M2I 

B6 

•Ml 

B7 

MM 

BAOSZm 

EAE4 

BADTAP 

E4C1 

BCPTHAB1 

BE99 

BCPTHAB2 

BC9B 

BCPTHA83 

BE9D 

BCPTMCOl 

BE9F 

BCPTHCD2 

BEA1 

BCPTMC03 

6EA3 

BCPTYF1 

BEAB 

BCPTMF2 

BEAD 

BCPTMF3 

BEAF 

BCPTHL1 

6EB1 

BCPTHL2 

BEB3 

BCPTHL3 

BEBS 

BCRTMR1 

BEB7 

BCFTW2 

BED? 

BCPTNQ 

BEBB 

BCPTW1 

BEA5 

BCPTW2 

BEA7 

BCPTMV3 

BEA? 

EL0CX1 

FlAB 

BL0CK2 

F1BC 

BL0CK3 

F24A 

BOS 

BE7F 

BREAK 

E1F8 

GREAK1 

E291 

BREG 

BFEB 

BU- 

BFM 

BUFEND 

BFC7 

BUFPTR 

BFM 

BYTEMM1 

E376 

BYTENUH 

E36A 

Cl 

Mil 

Cl 

•M2 

C2 

MM 

C3 

MM 

C4 

Mil 

cs 

M2I 

C6 

•Ml 

C7 

MM 

CHEKSH 

E3I1 

OMTC1 

E937 

OKRC2 

E93D 

CHKLUC1 

E968 

CHOJC2 

E976 

okruci 

EMC 

CHKRUC2 

E957 

con 

BFM 

COLD 

BFI5 

CONENDC 

PJO 

CONFND 

E83F 

com 

E84F 

COWOGD 

E87E 

CONSLP 

E86A 

CCNV4 

E329 

COURT 

BFD3 

CPRET 

E34B 

CPRMEJ1 

E338 

CRACIAL 

GE82 

CRACIAT 

BEM 

CRACIAX 

EE81 

CREG 

BFEA 

CRPIAA 

BE95 

CRPIAB 

BE94 

CRPIAC 

BE97 

CRPIAD 

BE98 

CRPTNAB1 

BE83 

CRPTMAB2 

EE84 

CRPTMA83 

BE85 

CRPTWCD1 

BEM 

CRPTMCD2 

BE87 

CRPTMC03 

BEM 

CRPTMF1 

BE8C 

CRPTK2 

BE8D 

CRPDF3 

BE8E 

CRPTHl 

BE8F 

CRPTHL2 

BE9I 

CRPTTL3 

BE91 

CRPTMR1 

BE92 

CRPTIfB 

BE93 

CRPTNR3 

BE94 

CRPTHV1 

BE89 

CRPTHV2 

GE8A 

CRPTMV3 

GEM 

CS1 

E3M 

CTABLE 

E882 

M 

•Ml 

01 

•M2 

02 

MM 

03 

&AAA 

ww 

04 

Mil 

D5 

M2I 

06 

M4I 

07 

MM 

DCRET 

E91D 

OCR®! 

E911 

DISK)! 

E34C 

DISflENl 

E354 

DL1I 

E27D 

[LOOP 

E275 

BCSZKN 

EAFF 

DONEPOHU 

ED58 

DSZHEM2 

EBM 

ECHO 

BFE8 

EKDW 

E3E1 

EOF 

E3E2 

E0F1 

E3E7 

FEE 

E91E 

FIE 

E924 

FINDS 

E4C3 

FC€ 

E92A 

FRONTUC 

E933 

FS1I 

E4C4 

FSTSZGO 

EAF1 

Fun 

E9M 

FHCOUNT 

EEF7 

FWDOK 

E946 

FWRESET 

E9A4 

GETRG1 

E481 

GETRG3 

E487 

GETRG4 

£418 

GETRNG 

E3FI 

GO 

E42I 

0011 

E42B 

INC*®! 

E988 

INIT 

ECFC 

INIT2 

E03B 

INITACIA 

ECF2 

INITPIA 

ECUS 

INITPTH 

ECOF 

INK 

E627 

IH.QGP1 

E398 

IH.0CP2 

E3A8 

INRET 

E91I 

INT ACIAL 

ECC9 

INTACIAT 

ECAB 

INT ACIAX 

ECBA 

INTMASK 

BEEE 

INTPIAAB 

EB37 

INTPIACD 

EB6D 

INTPTNAB 

EBA3 

INTPTMCD 

EBCF 

INTPTfF 

EC27 

INTPTML 

EC53 

INTPTtR 

EC7F 

INTPTHV 

EBFB 

INUAIT 

E838 

10 

cm 

IOOFFSET 

BEDS 

IROVEC 

BFF7 

ISCTRLX 

E325 

J6AD 

E&3& 

JP1NCX 

ES34 

IASTCH 

FFF5 

LERI* 

E49B 

LEFTVHEE 

E967 

LWF  4 

E  4AF 

UP? 

E4B3 

LKSONKP 

BF7C 

LOAD 

E42E 

L0AD1 

E4&3 

LOAD2 

E433 

LOCW 

E664 

LOOFST 

E43C 

LOOKSON 

EDAB 

LOOPPOS1 

EA9F 

LSXTEHP 

BF7E 

LWC0UKT1 

BEFD 

LMCC0NT2 

BEFF 

LWOOfC 

E984 

LUHODI 

BF03 

Ltiioo: 

EF44 

LHRESET 

e m 

HA 

E6E8 

HACIA 

MM 

HAC1AI 

8FF5 

HBADOR 

£•47 

KBEGA 

AM2 

(BYTE 

E0SS 

HBYTECT 

AMD 

MCI 

E044 

HC2 

E132 

HCHANGE 

E0S5 

hchasi 

E487 

HCXSH 

AAAA 

rrwii 

HC0NTL2 

E0FF 

HCONTRL 

E4E3 

HENDA 

AH4 

(GOAI 

AMS 

KIN1HC 

E0BE 

MINCH 

E078 

M1NEEE 

E1AC 

N1NHEX 

E0AA 

HINOEKI 

EISA 

HIN0EX2 

EIB8 

M1MOGCO 

E1B1 

mo 

EM0 

KIOS 

EIEA 

HIOV 

AM* 

HOAD 

cm 

H0ADI1 

E42F 

H0AD15 

E03B 

H0AD19 

cm 

H0A03 

£•13 

(fCL 

EI9D 

HHCLOFF 

E!9C 

HHCONT 

ABII 

(C1TAPEI 

EI34 

HNIO 

AM6 

(WENT 

E242 

H0N1TR 

E24S 

HORETIC 

BEC7 

H0UT2H 

E0BF 

H0UT2HS 

EKA 

H0UT4HS 

E4C8 

HOUTCH 

E*73 

HOUTEEE 

E1D1 

HOUTH 

E047 

HOUTW 

EMI 

(CUTS 

E0CC 

M0UTS2 

E*CE 

HOVE 

E&39 

H0VE1 

E646 

H0VE2 

EASE 

HPDATA1 

E*7E 

HPDATA2 

E*7B 

IPOUDUN 

EM5 

(PRINT 

EltF 

IPUN11 

E148 

HPUN22 

E15A 

(PUN23 

E1SC 

HPUN32 

EI7C 

(PUNCH 

E13D 

(PY8 

E774 

HPYLP 

E77C 

rmFT 

E7M 

HSAV 

EIA5 

HSFE 

El  13 

RSFEI 

El  ID 

HSCHQN 

E28A 

MSP 

AM8 

HSTACX 

M42 

(TOP 

AME 

HTW 

ANF 

mui 

Am 

HXHI 

AMC 

HXLOU 

AMO 

HXTEIP 

A412 

HYFIAO* 

BFE5 

HYFLAG1 

BFE6 

NA1 

E4F2 

NA3 

E546 

NEX2D 

E4CC 

NHIVEC 

BFFD 

NSSLA 

BEE2 

NSSLfi 

GEE3 

NSSLC 

8EE4 

NSSLD 

BEES 

NXTADR 

E4E& 

NXTRTS 

E4FI 

0C1* 

E51C 

0C29 

E528 

OOESSEY 

BFM 

OFFSET 

GFC8 

OSEHOO 

BF»I 

OSEREG 

BEF7 

OSRAH 

BEM 

es*b 

E369 

■■'In  IrM 

M48 

P.CD 

•«• 

P.CRA 

•MI 

P.CRB 

o 

P.ttD 

•M3 

P.DOA 

AAAA 

ml 

P.DOB 

•M2 

P.DOC 

MM 

P.DDD 

•M2 

P.PRA 

MM 

P.PRB 

•M2 

P.PRC 

MM 

P.PRD 

•M2 

P.SRA 

•MI 

P.SRB 

•M3 

Pt  SRC 

•MI 

P.Sfffl 

•M3 

P4HEXS 

E5A5 

PBAER 

E5ED 

PC 

E6A* 

PCRLF 

E52A 

PERIOD 

E3B4 

PEXISTS 

E5AC 

PHEX 

E7C3 

PHF2* 

E546 

PIAAB 

M48 

PI  AGO 

M50 

PIACRA 

•MI 

P1ACRB 

•M3 

PIACRC 

•Ml 

PIACRD 

AAA*) 

WvJ 

PI ADDA 

MM 

PIADDB 

•M2 

PIADDC 

AAAA 

ffvv 

PIADDD 

•M2 

PIAPA 

AAAA 

ml 

PIAPB 

•M2 

P1APC 

AAAA 

wW 

PIAPD 

•M2 

PIASTATA 

•MI 

PIASTATB 

•M3 

PIASTATC 

•Ml 

PIASTATD 

•M3 

PINCX 

E7DI 

P1NXRTS 

E7D8 

PHSS 

E7FB 

PHSRTS 

E80A 

POS 

EA8E 

POSDOH 

EA87 

POWERUP 

BEDC 

PR1 

E2CA 

PR1» 

E2DA 

PR20 

E2E4 

PREC1* 

E585 

PREG 

BFEF 

PREGS 

E2CS 

PRELPTHF 

E986 

PRELPTH 

E99A 

PRELPT* 

E9M 

PRNTASC 

E3B6 

PS 

E6VS 

PSPACE 

E5A7 

PTHAB 

M18 

PTHCD 

M20 

PTMCR1 

4AAli 

IWf 

PTHCR2 

•Ml 

PTHCR3 

MM 

PUP 

M3* 

PTH 

M38 

PTTB 

M40 

PTHSTAT 

•Ml 

PTHV 

M28 

PULXA 

£705 

PINBYTE 

E59D 

PUNCH 

E52E 

PINCH  1 

E533 

pundm 

E558 

PUND20 

E55A 

PUNT2 

E197 

PUTA 

E7E1 

PUTAX 

E7DC 

PUTRDY 

E7E2 

PX2 

E5BC 

pxistx 

E5AF 

A-53 


emcc 

E0E* 

QSAOR 

E9A3 

QCKSfCR 

E8EE 

OEOF 

E8B5 

mis 

E88? 

QREGNAN 

ESCB 

CRNGERR 

E8AB 

QS1 

E8DB 

QTAPER 

E0C7 

QTPEOF 

E8M 

RANS1ZEH 

BEDF 

RAMSIZa 

BEDO 

RDFRE 

E4M 

RDSCWOON 

EA9C 

RE ABACI 

E3I9 

READSONA 

EA54 

RECTYP 

BFTJ2 

RESETV 

FFFE 

REST AX 

E2F1 

RET39 

E328 

RIGHTWHE 

E948 

RNGERR 

E414 

ROHAYRA 

EB0A 

ROMOVERR 

EB1& 

R02R2P2 

E334 

RS 

E6B6 

RSFSR 

E65A 

RSRX1T 

EMC 

Rill 

E2SA 

RT2I 

E261 

RT9I 

E267 

RUSH 

E2F7 

RUC0UNT1 

BEF9 

RWC0WfT2 

BEFB 

RUDOTC 

E965 

RUMOD1 

BFI1 

RHM0O2 

BFI2 

RURESET 

E9A8 

SCARRY 

E81I 

SETHI 

E5F3 

SETHEH 

E50F 

SETOFF 

E5C2 

SETOUT 

E5D7 

SE7PU. 

E5DE 

SETHS 

E811 

S1ZELP1 

EABF 

SIZEIG1 

EAB8 

SH 

E3F4 

SMI 

E5FD 

SK3I 

EME 

SONARA 

BEC1 

SONARB 

BEC2 

SONARC 

BEC3 

SCNARD 

BEC4 

SCNARSLA 

BEBD 

SONARSLB 

BEBE 

SONARSLC 

BEEF 

SONARSLD 

FEW 

SONCHANG 

BEE1 

SONDATRA 

GEFI 

SONOATRB 

BEF2 

SCNOATRC 

BEF4 

SONDATRD 

BEF4 

SONOATSA 

BEEF 

S0NDATS8 

BEF1 

SONDATSC 

BEF3 

SONDATSO 

BEF5 

SOMOA 

BEE2 

SOMEXB 

BEE3 

SOWEXC 

BEE4 

SONNEXD 

BEES 

SONPR1NT 

ED5F 

SONTIME 

EEC3 

SP1 

EDM 

SP2 

EDM 

SP3 

ED7D 

SPA128 

ED93 

SPAM 

ED9F 

SREG 

BFF1 

SSLA 

BEBD 

SSLB 

BEBE 

SSLC 

DEBT 

SSLB 

DEC! 

STAB 

E6C9 

START 

E1EF 

START1 

E1FD 

STAUXH 

E722 

SUBABX1 

E742 

SMI2I 

E2A3 

SU13I 

E2A8 

SU14I 

E2AF 

SHIM 

E282 

SWIHAK 

£295 

SU1VEC 

BFFA 

SYSFIAO 

BFE7 

SYSIRQ 

FFF8 

SYsmi 

FFFC 

SYSSMI 

FFFft 

T.AB 

1318 

T.C1 

MM 

T.C2 

mi 

T.C3 

em 

T.CD 

M2I 

T.CNT1 

m2 

T.CNT2 

MM 

T.CNT3 

m6 

T.F 

MSI 

T.L 

M38 

T.LATCH1 

m 2 

T.LATCH2 

mm 

T.LATCH3 

m* 

T.R 

M4I 

T.S 

mi 

T.V 

M28 

TA 

E72B 

TABU 

E6CF 

TCOUNT 

BFE9 

TEJFI 

BFD5 

TEMPI 

BFD7 

TEMP2 

BFD9 

TEMP3 

BFDB 

TEHP4 

3FDD 

TEMP5 

BFDF 

TE7P6 

BFE1 

TEMP7 

BFE3 

TESTZ 

E727 

TICHAN 

E9M 

TICHAN1 

E9C2 

TICHAN2 

E9C0 

TICHAK3 

EA38 

TICTEH’I 

BEE6 

TICTEMP1 

BEE8 

TICTEHP2 

BEEA 

TIC7EMP3 

BEEC 

TICTIME 

BED9 

T1MEZERO 

BECA 

TRC 

E6AC 

TSUB 

E751 

TUSRAM 

BCM 

USRSTAK 

BEM 

USUI 

BFF3 

U2I 

E61A 

U34 

E626 

UA1TTY 

EMI 

HARM 

BFI8 

XABX1 

E6D9 

XREG 

DEED 

XZERO 

AAAA 

fWVf 

ft- 54 
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l«  APPENDIX  B  * 

;*  * 

gHHHHHHimiHfWHHHHHHHmHIWHH 

{  FILES  XTEND.A 

|  EXTENDED  INTERRUPT  HANDLER  AS  OF  2#  OCT  1984 


1 

1 

I 


BCBB 

TUSRAH 

ECU 

BBCBBH 

{TOP  OF  USER  RAM 

ECFC 

INIT 

CQU 

BECFCH 

{SYSTEM  INITIALIZATION  ENTRY  POINT 

9BM 

XZERO 

EQU 

AIAAMJ 

Iwwl 

{LOAD  ZERO  INTO  INDEX  REGISTER 

CM 

10 

EQU 

BCBBBH 

;I0  AREA 

MM 

ACIAT 

EQU 

B 

{TERMINAL  ACIA  OFFSET  INTO  10  AREA 

AAAA 

Wfl 

A.S 

EQU 

B 

;ACIA  STATUS  OFFSET 

MM 

A.C 

EQU 

B 

;ACIA  CONTROL  OFFSET 

Mil 

A.TX 

EQU 

1 

;ACIA  TRANSMIT  REGISTER  OFFSET 

Ml 

A.RX 

EQU 

1 

;ACIA  RECEIVE  REGISTER  OFFSET 

BEEE 

INTNASK 

EQU 

BBEEEH 

{INTERRUPT  MASK  B=NO  $FF»YES 

EA34 

READSONAR 

EQU 

BEA54H 

{READ  SONAR  SUBROUTINE 

BSl 

SONCHANGE 

EQU 

BBEE1H 

{CHANGE  SONARS  IF=B  ELSE  NM53 

cDFB 

INTPTNV 

EQU 

BEPFBH 

eon 

XON 

Etw 

B11H 

M13 

XOFF 

EQU 

B13H 

BEC7 

MORETIC 

EQU 

BBEC7H 

{JUMP  VECTOR  FOR  EXTENDED  INTERRUPTS 

BED? 

TICTIME 

EQU 

BBED9H 

{TIKE  SINCE  TIME  ZERO  OR  LAST  RESET 
;IN  TENTHS  OF  SECONDS  OR  REPETITIONS 
;0F  THE  SONAR  INTERRUPT  CLOCK 

E7EC 

ASCI IL 

EQU 

BE7ECH 

{CONVERT  LETT  NIBBLE  OF  A  BYTE  TO  ASCII 

E7FB 

ASCI IR 

EQU 

BE7FBH 

{CONVERT  RIGHT  NIBBLE  OF  BYTE  TO  ASCII 

BEF7 

FWCOUNT 

EQU 

4BEF7H 

{FRONT  WHEEL  COUNT 

BEF? 

RWC0UNT1 

EQU 

BBEF9H 

{RIGHT  WHEEL  COUNT  BACKWARD 

BEFB 

RWC0UMT2 

EQU 

BBEFBH 

{RIGHT  WHEEL  COUNT  FORWARD 

BEFD 

LWCOUNTt 

EQU 

eSEFDH 

{LEFTHHEEL  COUNT  BACKWARD 

BEFF 

LWC0UNT2 

EQU 

BBEFFH 

{LEFTWHEEL  COUNT  FORWARD 

BEEF 

SCNDf.TSA 

EQU 

BBEEFH 

{AS  IN  'WHERE'3  THE 

BEFB 

SONDATRA 

EQU 

BBEFBH 

{SONAR  RANGE  FOR  A 

BEF1 

SONDATSB 

EQU 

BBEF1H 

{SONAR  SELECT  BYTE  FOR  B 

BEF2 

SGNDATRB 

EQU 

B8EF2H 

{SONAR  RANGE  FOR  B 

BEF3 

SONDATSC 

EQU 

BBEF3H 

{SONAR  SELECT  BYTE  FOR  C 

BEF4 

SUNDATRC 

EQU 

BBEF4H 

{SONAR  RANGE  FOR  C 

BEFD 

SONDATSD 

EQU 

BBEF5H 

{SONAR  SELECT  BYET  FOR  D 

BEF6 

SONDATRD 

EQU 

BBEF6H 

{SONAR  RANGE  FOR  D 

ED5F 

SONPRINT 

EQU 

0ED5FH 

{SUBROUTINE  THAT  CONVERTS  THE  SONAR  RANGE 
{IN  BINARY  TO  DECIMAL  TENTHS  OF  FEET 

BFCA 

ADR 

EQU 

BBFCAH 

{DESTINATION  ADDRESS  FOR  MOVE  C0M1AND 

BfCC 

ADDL 

EQU 

BBFCL.1 

{START  OF  MOVE  ADDRESS  FOR  MOVE  COMMAND 

BFCE 

ADDH 

EQU 

BBFCEH 

{END  OF  MOVE  ADDRESS  FOR  MOVE  COMMAND 

IW> 

M0VE1 

EQU 

BE646H 

{SUBROUTINE  ADDRESS  OF  MOVE  COMMAND 

BEE2 

SCNNEXA 

EQU 

BBEE2H 

{NEXT  SONAR  TO  BE  SELECTED  FOR  A 

BEE3 

SOfWEXB 

EQU 

BBEE3H 

{NEXT  SONAR  TO  BE  SELECTED  FOR  B 

BEE4 

sonkxc 

EQU 

0BEE4H 

; NEXT  SONAR  TO  BE  SELECTED  FOR  C 

BEES 

SOMCXD 

s 

ECU 

0BEE5H 

{NEXT  SONAR  TO  EE  SELECTED  FOR  D 

01ft 

s 

ORG 

N100H 

BIN 

0F 

MININIT 

SCI 

; ALLOW  NO  INTERRUPTS  UNTIL 
; INITIALIZATION  IS  COMPLETE 

eiei 

BE  DC  N 

LDS 

ITUSRAH 

{INITIALIZE  STACK  POINTER 

1194 

36  BS 

LDAA 

NBSH 

;$ET  UP  CONTROL  WORD  FOR  TERMINAL 

01ft 

B7  C®  ft 

STAA 

IO+ACIAT+A.C 

•,ACIA  TO  ALLOW  INTERRUPT  C0ERATION 
{ON  BOTH  TRANSMIT  AND  RECEIVE 

0109 

CE  01  21 

LDX 

IXTEND 

5 SET  IP  MORETIC  EXTENDED  INTERRUPT 

010C 

FFBEC8 

STX 

MORETICM 

{HANDLER 

010F 

86  7E 

LDAA 

M7EH 

9111 

B7  BE  C7 

STAA 

MORETIC 

0114 

CE  ft  ft 

LDX 

tXZEFO 

0117 

FFBED9 

STX 

TICTIME 

911A 

BDEBFB 

JSR 

INTPTMV 

{REINITIALIZE  THE  TICTIME  COUNTER 

911D 

9E 

1 

I 

cli 

{ALLOW  INTERRUPTS 

911E 

3E 

I 

• 

TWIDDLE 

UAI 

(DO  NOTHING.  WAIT  FOR  INTERRUPTS 

911F 

20  FD 

BRA 

TWIDDLE 

NOTE  THAT  Tt€  (IAIN  PROGRAM  IS  DOING  NOTHING  AND  • 
AS  SUCH  CAN  BE  MODIFIED  TO  TAKE  ADVANTAGE  OF  PROCESSOR  * 
CYCLES  NOT  USED  BY  THE  INTERRUPT  HANDLER  * 


SUBROUTINE:  XTEND 


AN  EXTENT  ION  OF  Tl€  EXISTING 
NAV  COMPUTER  INTERRUPT  HANDLER. 

ITS  PURPOSE  IS  TO  GATHER  TIME 
TAGED  SONAR  AND  0PT1CM.  SHAFT 
ENCODER  DATA  AND  SEND  IT  OUT 
THE  TERMINAL  FORT  TO  AN  EXTERNAL 
COMPUTER  FOR  POST  MISSION 
PROCESSING  OR  REAL  TIME  ANALYSIS 
FOR  DRIVE  COMPUTER  COMMAND  GENERATION. 


9121 

7D  EE  El 

XTEND 

TST 

SONCHANGE 

{HAVE  SONARS  BEEN  CHANGED  SINCE 
{LAST  REQUEST? 

9124 

27  3B 

BEC 

XTEND2 

;  IF  NOT  THEN  CONTINUE  INTERRUPT 
{PROCESSING 

9126 

7D  95  6A 

CANDATA 

TST 

BUFLEFT 

{ELSE  SEE  IF  MORE  THAN  256  BYTES  IN 

0129 

22  93 

BHI 

CALLRDSON 

{IN  BUFFFER.  IF  YES  CALL  READSONAR 

B-2 


1128 

7E81  61 

JMP 

XTEND2 

; ELSE  CONTINUE  INTERRUPT  PROCESSING 

812E 

4F 

CALLRDSCN 

CLRA 

•12F 

43 

corn 

j CREATE  A  LINE  OF  SOW  AND  OSE  TINE 

8138 

07  BE  EE 

STAA 

INTMASK 

{TAGED  DATA 

8133 

80  EA  54 

JSR 

REAOSONAR 

{GET  TIE  SONAR  DATA  AND  TINE 

8136 

4F 

CLRA 

8137 

B7  BE  EE 

STAA 

INTNASK 

813A 

BO  84  2D 

JSR 

S0NSU1TCH 

;  SET  UP  NEXT  SOWS  TO  BE  USED 

8130 

BD  82  43 

JSR 

PUTTIME 

;PUT  TINE  IN  BUFFER 

8148 

60  82  62 

JSR 

PUTFW 

{PUT  FRCNT  W-Za  COLNT  IN  BUFFER 

8143 

BO  82  6C 

JSR 

PUTIN 

5  PUT  LEFT  WHEa  COUNTS  IN  BUFFER 

8146 

BD  82  86 

JSR 

PUTRW 

; PUT  RIGHT  WHEEL  COUNTS  IN  BUFFER 

8149 

BD  82  AA 

JSR 

PUTA 

5 PUT  SONAR  READINGS  IN  BUFFER 

814C 

BD  82  FA 

JSR 

PUTB 

814F 

BD  83  4A 

JSR 

PUTC 

8152 

BO  83  9A 

JSR 

PUTD 

8155 

BD  83  EA 

JSR 

PUTL1NE 

;PUT  THE  LINE  BUFFER  INTO  THE  SPOOLER 

8158 

BO  84  88 

JSR 

OECBLEFT 

;  DECREMENT  THE  SPOOLER  BUFFER  BY  64 

815B 

BD  84  8B 

JSR 

ADDLEFTPR 

{ADD  64  TO  MJMBER  LEFT  TO  PRINT 

815E 

BO  84  16 

JSR 

ADOBUFNX 

{POINT  TO  NErT  AVAILABLE  SPOOLER  ADDRESS 

8161 

CE  88  88 

XTEND2 

LDX 

8XZER0 

8164 

BC  85  66 

CPX 

LEFTPR 

{ARE  CHARACTERS  AVAILABLE  TO  TRANSMIT? 

8167 

26  83 

BNE 

XTEND3 

;YES  GO  TRANSMIT 

8169 

7E  81  9A 

JMP 

TSTRX 

;N0.  CONTINUE  INTERRUPT  PROCESSING. 

816C 

70  85  65 

XTEKD3 

TST 

MEXOFF 

;IS  XOFF  IN  FFFECT? 

816F 

26  29 

BNE 

TSTRX 

{YES.  GO  CHECK  RECEIVE  BUFFER, 

8171 

B6C8  88 

LDAA 

KHACIAT4A.S 

;aSE  CHECK  FOR  TRANSMIT  BUFFER  EMPTY. 

8174 

47 

ASRA 

8175 

47 

ASRA 

8176 

24  22 

BCC 

TSTRX 

{NOT  EMPTY  SO  CHECK  RECEIVE  BUFFER. 

8178 

FE  85  68 

LDX 

NXOFR 

;YES  EMPTY  SO  POINT  TO  NEXT  CHARACTER 

817B 

A6  88 

LDAA 

M 

{GET  IT  AND  TRANSMIT  IT  OUT. 

8170 

B7C8  81 

STAA 

IO+ACIAT+A.TX 

8188 

88 

INX 

{POINT  TO  NEXT  CHARACTER 

8181 

8CA8  88 

CPX 

iSPBUFEND+1 

;IS  IT  THE  END  OF  THE  BUFFER? 

8184 

26  83 

BNE 

UPNXCHPR 

{NO.  RESTORE  TIC  POINTER 

8186 

FE  85  6E 

LDX 

SPBUFST 

;YES.  POINT  TO  THE  START  OF  THE  BUFFER 

8189 

FF  85  68 

UPNXCHPR 

STX 

NXCHPR 

{RESTORE  THE  POINTER 

818C 

FE  85  66 

LDX 

LEFTPR 

{ONE  LESS  TO  PRINT 

818F 

89 

OEX 

8198 

FF  85  66 

STX 

LEFTPR 

8193 

FE  85  6A 

LDX 

BUFLEFT 

;08£  MORE  FOR  TIC  AVAILABLE  BUFFER 

8196 

88 

INX 

8197 

FF  85  6A 

STX 

BUFLEFT 

819A 

B6C8  88 

TSTRX 

LDAA 

IO+ACIAT+A.S 

{CHECK  TO  SEE  IF  CHARACTER  RECEIVED 

8190 

47 

ASRA 

819E 

24  25 

BCC 

TSTRX2 

{NOTHING  RECEIVED 

81A8 

B6  C8  81 

LDAA 

I0+AC1AT+A.RX 

;YES.  GET  RECEIVED  CHARACTER. 

81A3 

81  11 

CMPA 

8811H 

{IS  IT  XQN? 

81A5 

26  85 

BNE 

TSTRX3 

;N0.  CHECK  FOR  OMR  CCmtfNDS 

81A7 

7F  85  65 

CLR 

MEXOFF 

;YES  SO  CLEAR  M  XOFF  FLAG 

81AA 

28  B5 

BRA 

XTEND2 

{AND  GO  TRY  TO  TRANSMIT  A  CHARACTER 

•1AC 

81  13 

TSTRX3 

OPA 

W13H 

f IS  IT  XOFF? 

•1AE 

26  07 

6NE 

TSTRX4 

;N0.  OCCK  FOR  OTHER  COMMANDS 

•IN 

86  FF 

LDAA 

MFFH 

;YES.  GO  SET  TIC  XOFF  FLAG 

•162 

67  05  65 

STAA 

HEXOFF 

•IBS 

20  0E 

BRA 

TSTRX2 

;END  RECEIVE  FUNCTION 

•167 

81  97 

TSTRX4 

OPA 

#007 

; IS  IT  CONTROL  C? 

•169 

26  0D 

BNE 

TSTRX5 

;N0.  CHECK  FOR  OTHER  COflANDS 

•166 

BDEBFB 

JSR 

INTPTMV 

{RESET  10  HZ  COUNTER 

•1BE 

DEN 

LDX 

XZERO 

{YES.  RESET  TICTIME  TO  ZERO 

•1C9 

FF  BED? 

STX 

TICTIME 

01C3 

29N 

BRA 

TSTRX2 

•ICS 

39 

TSTRI2 

RTS 

{END  OF  INTERRUPT  PROCESSING 

•1C6 

•1 

NOP 

•1C7 

•1 

NOP 

•1C8 

81  31 

TSTRX5 

OPA 

N31H 

;IS  IT  1? 

•1CA 

26  19 

BNE 

TSTRX6 

{NO.  CHECK  FOR  OTHER  COMMANDS 

;YES.  DO  SONARS  1  AT  A  TIME 

•ICC 

CE  04  B9 

LDX 

•PTAB1END 

{POINT  TO  END  OF  TABLE 

•1CF 

FF  M  48 

STX 

SONEND+1 

•1D2 

CE  04  5D 

LDX 

•PTAB1 

{POINT  TO  START  OF  TABU 

•IDS 

FF  04  4D 

STX 

S0NEND2+1 

•1D8 

FF  N  56 

STX 

PTABNEXT 

•1D6 

BDEBFB 

JSR 

INTPTW 

{RESET  10  HZ  COUNTER 

•IDE 

DE  N 

LDX 

XZERO 

;YES.  RESET  TICTIME  TO  ZERO 

•1E0 

FFBED9 

STX 

TICTIME 

•1E3 

20  E0 

BRA 

TSTRX2 

•1E5 

81  32 

TSTRX6 

OPA 

M32H 

;IS  IT  2? 

•1E7 

26  19 

BE 

TSTRX7 

{NO.  CHECK  FOR  OTHER  COMWffiS 

;YES.  DO  SONARS  2  AT  A  TIME 

•IE? 

CENE9 

LDX 

•PTAB2END 

{POINT  TO  END  OF  TABU 

•1EC 

FF  04  48 

STX 

SONEND+1 

•1EF 

CENBD 

LDX 

#PTAB2 

{POINT  TO  START  OF  TABU 

•1F2 

FF  04  4D 

STX 

S0NEND2+1 

•1FS 

FF  04  5B 

STX 

PTABNEXT 

•1F8 

BDEB  FB 

JSR 

INTPTMV 

{RESET  10  HZ  COUNTER 

01FB 

DEN 

LDX 

XZERO 

{YES.  RESET  TICTIME  TO  ZERO 

•1FD 

FF  BE  09 

STX 

TICTIME 

•200 

20  C3 

BRA 

TSTRX2 

•202 

81  33 

TSTRX7 

OPA 

4033H 

{IS  IT  3? 

0204 

26  19 

BIC 

TSTRX8 

;N0.  CHECK  FOR  OTHER  COMMANDS 

{YES.  DO  SONARS  3  AT  A  TIME 

•206 

CE  05  W 

LDX 

•PTAB3END 

{POINT  TO  END  OF  TABU 

0209 

FF  04  48 

STX 

SONEND+1 

020C 

CE  04  ED 

LDX 

#PTAB3 

{POINT  TO  START  OF  TABU 

020F 

FF  04  4D 

STX 

S0NEND2+1 

0212 

FF  04  5B 

STX 

PTABNEXT 

021S 

BDEBFB 

JSR 

INTPTMV 

{RESET  10  HZ  COUNTER 

0218 

DEN 

LDX 

XZERO 

;YES.  RESET  TICTIME  TO  ZERO 

021 A 

FFBED9 

STX 

TICTIME 

02  ID 

20  A6 

BRA 

TSTRX2 

021F 

81  34 

TSTRX8 

OPA 

#034H 

{IS  IT  4? 

0221 

26  19 

BNE 

TSTRX9 

{NO.  CHECK  FOR  OTHER  COflIANDS 

;YES.  DO  SONARS  4  AT  A  TINE 

•223 

CEW21 

LDX 

•PTA84END 

{POINT  TO  END  OF  TABLE 

•226 

FF  M  48 

STX 

SONENOtl 

•229 

CE05W 

LDX 

•PTAB4 

{POINT  TO  START  OF  TABLE 

•220 

FF  #4  40 

STX 

S0NEND2M 

•22F 

FF  04  5B 

STX 

PTABNEXT 

•232 

BOEBFB 

JSR 

INTPTW 

{RESET  10  HZ  COUNTER 

•235 

BE  W 

LDX 

XZERO 

;YES.  RESET  TICTIHE  TO  ZERO 

•237 

FF  BE  09 

STX 

TICTIME 

•23A 

20  89 

BRA 

TSTRX2 

•23C 

81  83 

TSTRX9  CHPA 

•003H 

;IS  IT  CONTROL  C? 

•23E 

26  85 

BTC 

TSTRX2 

;N0.  END  RECEIVE  FUNCTION 

•24# 

7EECFC 

JJP 

I 

I 

I 

;  SUBROUTINE: 

INIT 

{JUMP  TO  RESET  SYSTEM 

PUniHE 

PUTS  TIHE  INTO  THE  LINE  BUFFER 

•243 

CE  05  27 

PUTTIfE  LDX 

•LNTIHE 

•246 

B6BE09 

LOAA 

TICTIHE 

•249 

60  02  53 

JSR 

PUT2HEX 

•24C 

B6BEDA 

LDAA 

TICTIHE#! 

•24F 

BO  82  53 

JSR 

PUT2HEX 

•252 

39 

RTS 

(• 


1  SUBROUTINE: 

I 

I 

I 

PUT2HEX 

CONVERTS  A  BYTE  INTO  TWO  ASCII 
CHARACTERS.  ON  ENTRY,  THE  INDEX 
REGISTER  POINTS  TO  WHERE  THE  TWO 
ASCII  CHARACTERS  ARE  TO  BE  PLACED, 

•253 

36 

PUT2HEX  PSHA 

0254 

BDE7EC 

JSR 

ASCI IL 

{CONVERT  THE  LEFT  NIBBLE 

0257 

A7M 

STM 

•,X 

0259 

08 

INX 

025A 

32 

PULA 

025B 

BD  E7F« 

JSR 

ASCI IR 

{CONVERT  THE  RIGHT  NIBBLE 

025E 

A7  08 

STM 

M 

0260 

08 

INX 

•261 

39 

RTS 

SUBROUTINE:  PUTFV  PUT  FRONT  WHEEL  COUNT  IN  LINE  BUFFER 


0262 

CE  05  2C 

PUTFV 

LDX 

IUFW 

0265 

B6BEF8 

LDM 

FVCOUNT+1 

0268 

BD  02  53 

JSR 

PUT2HEX 

026B 

39 

RTS 

I 


B-3 


SUBROUTINE:  PUTUt 


I2&C 

CEW2F 

PUTIN 

LDX 

•LNBLU1 

•2AF 

B6BEFD 

LDAA 

LNC0UNT1 

0272 

BO  02  S3 

JSR 

PUT2HEX 

•275 

BABE  FE 

LDAA 

LHCOUNTI+1 

•278 

BO  02  53 

JSR 

PUT2HEX 

•27B 

CE  #5  34 

LDX 

•LNFLU2 

•27E 

B6BEFF 

LDAA 

LHC0UNT2 

•281 

BO  *2  53 

JSR 

PUT2HEX 

•284 

BA  BFM 

LDAA 

LHCXXJHTM 

•287 

BO  02  53 

JSR 

PUT2HEX 

•28A 

3? 

RTS 

PUT  LEFT  '4€EL  COUNTS  IN  LINE  BUFFER 
{GET  THE  REVERSE  COUNTS 


5  GET  THE  FORHfKD  COUNTS 


SUBROUTINE*  PUTRU 


•28B 

CE  05  39 

PUTRU 

LDX 

•LNBRU1 

•28E 

BABEF9 

LDAA 

RWCOUNTl 

•291 

BD02  53 

JSR 

PUT2HEX 

•294 

BA  BE  FA 

LDAA 

RHC0UNT1+1 

•297 

BO  92  S3 

JSR 

PUT2HEX 

•29A 

CE95  3E 

LDX 

•LNFRU2 

•29D 

BA  BE  FB 

LDAA 

RNC0UNT2 

•2A0 

BO  02  53 

JSR 

PUT2HEX 

•2A3 

BA  BE  FC 

LDAA 

RHC0UNT2+I 

•2AA 

BD  02  53 

JSR 

PUT2HEX 

•2A9 

39 

RTS 

PUT  RIGHT  HEEL  COUNTS  IN  LINE  BUFFER 
(GET  REVERSE  COUNTS 


{GET  FORWARD  COUNTS 


{  SUBROUTINE!  PUTA 

•2AA  CE  05  44  PUTA  LDX  iLNATRANS 

•2AD  BA  BE  EF  LDAA  SONDATSA 


PUT  SONAR  A  SELECTED  IN  LINE  BUFFER 

{POINT  TO  LINE  POSITION 

{GET  THE  SELECTED  TRANSDUCER  • 


1 


81  91 

CHPA 

11 

;M$  IT  9 

26  96 

BNE 

PUTA2 

;NO  CONTINUE  SEARCH 

86  18 

LDAA 

#'9' 

A7  99 

STAA 

9,1 

2136 

BRA 

PUTA8 

;GO  PUT  DISTANCE  READING 

81  92 

PUTA2 

CHPA 

12 

;UAS  IT  I 

26  96 

BNE 

PUTA3 

;NO  CONTINUE  SEARCH 

86  31 

LDAA 

#M' 

A7  99 

STAA 

8.X 

29  2C 

BRA 

PUTA8 

;GO  PUT  DISTANCE  READING 

81  94 

PUTA3 

CHPA 

94 

;MS  IT  2 

26  96 

BNE 

PUTA4 

;NO  CONTINUE  SEARCH 

86  32 

LDAA 

#'2' 

A7  99 

STM 

9,1 

29  22 

BRA 

PUTA8 

;GO  PUT  DISTANCE  READING 

81  19 

PUTA4 

CHPA 

9919H 

(NAS  IT  4 

26  96 

BNE 

PUTA5 

;NG  CONTINUE  SEARCH 

86  34 

LDAA 

#'4' 

A7  99 

STM 

9,X 

29  18 

BRA 

PUTA8 

;GO  PUT  DISTANCE  READING 

81  29 

PUTA5 

CHPA 

I929H 

;UAS  IT  5 

26  96 

BNE 

PUTA6 

;NG  CONTINUE  SEARCH 

86  35 

LOM 

#'5' 

A7  99 

STM 

8,X 

29  9E 

BRA 

PUTA8 

;GO  PUT  DISTANCE  READING 

81  49 

PUTA6 

CHPA 

9949H 

{HAS  IT  6 

26  96 

BNE 

PUTA7 

; MO  CONTINUE  SEARCH 

86  36 

LDM 

8' 6' 

A7  99 

STM 

9.X 

29  94 

BRA 

PUTA8 

;GO  PUT  DISTANCE  READING 

86  2A 

PUTA7 

LOM 

8'*' 

A7  99 

STM 

9,X 

66  BE  F9 

PUTA8 

LOM 

SONDATRA 

;  GET  THE  DISTANCE  READING 

CE  95  45 

LDX 

UNAREADING 

{POINT  TO  THE  LINE  POSITION 

BDED5F 

JSR 

SONPRINT 

{CONVERT  THE  READING  TO  DECIMAL 

{AND  PUT  IT  IN  THE  LINE  BUFFER 

39 

RTS 

{RETURN  TO  CALLER 

SUBROUTINE:  FUTB  PUT  SONAR  B  SELECTED  IN  LINE  BUFFER 


92FA 

CE  95  4B 

PUTB 

LDX 

tlNBTRANS 

{POINT  TO  LINE  POSITION 

92FD 

B6BEFI 

LDM 

SONDATSB 

;GET  THE  SELECTED  TRANSDUCER  • 

9399 

81  91 

CHPA 

91 

{HAS  IT  9 

9392 

26  96 

BNE 

PUTB2 

;NO  CONTINUE  SEARCH 

9394 

86  39 

LDM 

9’9' 

9396 

A7  99 

STM 

•|X 

9398 

29  36 

BRA 

PUTB3 

;GO  PUT  DISTANCE  READING 

B-7 


•3M 

81  02 

PUTB2 

C)fA 

•2 

;WAS  IT  1 

I38C 

26  06 

RE 

PUT  83 

;N0  CONTINUE  SEARCH 

•30E 

86  31 

LDAA 

1*1* 

1310 

A7  00 

STAA 

M 

•312 

20  2C 

BAA 

PUTB8 

;00  PUT  DISTANCE  READING 

•314 

81  04 

PUTB3 

OPA 

*4 

;WAS  IT  2 

•316 

26  06 

BNE 

PUTB4 

5 NO  CONTINUE  SEARCH 

•318 

86  32 

LDAA 

1*2* 

•31A 

A7  00 

STAA 

M 

•31C 

20  22 

BRA 

PUTB8 

{QO  PUT  DISTANCE  READINO 

•31E 

81  !• 

PUTB4 

CHPA 

•010H 

{WAS  IT  4 

•320 

26  06 

BNE 

PUTB5 

;NO  CONTINUE  SEARCH 

•322 

86  34 

LDAA 

1*4* 

•324 

A7  00 

STAA 

M 

•326 

20  18 

BRA 

PUTB8 

{QO  PUT  DISTANCE  READINO 

•328 

81  20 

PUTB5 

CflPA 

H20H 

{HAS  IT  5 

•32A 

26  06 

BNE 

PUTB6 

;N0  CONTINUE  SEARCH 

•32C 

86  33 

LDAA 

•*5* 

•32E 

A7  00 

STAA 

M 

•334 

20  0E 

BRA 

PUTB8 

;GO  PUT  DISTANCE  READINO 

•332 

81  40 

PUTB6 

OPA 

tVWl 

{WAS  IT  6 

•334 

26  06 

BNE 

PUTB7 

; NO  CONTINUE  SEARCH 

•336 

86  36 

LDAA 

0*6* 

•338 

A7  00 

STAA 

•,X 

•33A 

20  04 

BRA 

PUTB8 

{QO  PUT  DISTANCE  READINO 

•33C 

86  2A 

PUTB7 

LDAA 

**** 

033E 

A7  00 

STAA 

•,X 

•340 

B6  BE  F2 

PUTB8 

LDAA 

SCNDATRB 

;  GET  THE  DISTANCE  READING 

0343 

CE  05  4C 

LOX 

•LNBREADING 

{POINT  TO  TIC  LINE  POSITION 

•346 

BO  ED  SF 

JSR 

SONPRINT 

{CONVERT  TIC  READING  TO  DECIMAL 

;AND  PUT  IT  IN  THE  LINE  BUFFER 

•349 

39 

1 

1 

RTS 

{RETURN  TO  CALLER 

• 

1 

SUBROUTINE: 

PUTC 

PUT  SONAR  C  SELECTED  IN  lift  BUFFER 

•34A 

CE  05  52 

PUTC 

LDX 

ILNCTRANS 

{POINT  TO  LINE  POSITION 

•34D 

B6BEF3 

LDAA 

SONTJATSC 

{GET  THE  SELECTED  TRANSDUCER  • 

0350 

81  01 

GPA 

II 

{HAS  IT  • 

•352 

26  06 

BNE 

PUTC2 

{NO  CONTINUE  SEARCH 

•354 

86  30 

LDAA 

**«' 

0356 

A7  00 

STAA 

M 

0358 

20  36 

ERA 

PUTC8 

;GO  PUT  DISTANCE  READING 

035< 

81  02 

PUTC2 

CJPA 

•2 

;UAS  IT  1 

•356 

26  06 

BNE 

PUTC3 

;NO  CONTINUE  SEARCH 

•35E 

86  31 

LDAA 

•*r 

0360 

A7  00 

STAA 

•(x 

0362 

20  2C 

BRA 

PUTC8 

;GO  PUT  DISTANCE  READING 

•364 

81  04 

PUTC3 

CMPA 

14 

{HAS  IT  2 

0-8 


^ 


1366 

26  86 

BNE 

PUTC4 

{NO  CONTINUE  SEARCH 

♦368 

86  32 

LDAA 

8*2' 

♦36A 

A7  n 

STAA 

8,1 

836C 

28  22 

ERA 

PUTC8 

;GO  PUT  DISTANCE  READING 

♦36E 

81  18 

PUTC4 

CHPA 

•818H 

; WAS  IT  4 

♦371 

26  86 

BNE 

PUTC5 

;NO  CONTINUE  SEARCH 

♦372 

86  34 

LDAA 

•'4' 

♦374 

A7  88 

STAA 

8,1 

♦376 

28  18 

BRA 

PUTC8 

;CC  PUT  DISTANCE  READING 

♦378 

81  28 

PUTC3 

CHPA 

M28H 

{HAS  IT  5 

♦37A 

26  86 

BNE 

PUTC6 

;  NO  CONTINUE  SEARCH 

♦37C 

86  35 

LDAA 

1*5' 

♦37E 

A7  88 

STAA 

8,X 

♦388 

28  8E 

BRA 

PUTC8 

;GO  PUT  DISTANCE  READING 

♦382 

81  48 

PUTC6 

CHPA 

•848H 

{HAS  IT  6 

♦384 

26  86 

BNE 

PUTC7 

; NO  CONTINUE  SEARCH 

♦386 

■•6  36 

LDAA 

8' 6' 

♦388 

A  88 

STAA 

♦,X 

♦38A 

28  84 

BRA 

PUTC8 

{GO  PUT  DISTANCE  READING 

♦38C 

86  2A 

PUTC7 

LDAA 

*’*' 

♦38E 

A7  88 

STAA 

8,X 

♦398 

B6BEF4 

PUTC8 

LDAA 

SONDATRC 

{GET  THE  DISTANCE  READING 

♦393 

CE  85  53 

LDX 

8LNCREAD1NG 

{POINT  TO  THE  LWE  POSITION 

♦396 

BDED5F 

JSR 

SONPRINT 

{CONVERT  THE  READING  TO  DECIMAL 

{AND  PUT  IT  IN  THE  LINE  BUFFER 

♦399 

39 

1 

1 

RTS 

• 

{RETURN  TO  CALLER 

1 

SUBROUTINE: 

PUTD 

PUT  SOMR  D  SELECTED  IN  LINE  BUFFER 

♦39A 

CE  85  59 

PUTD 

LDX 

tLNDTRANS 

{POINT  TO  LINE  POSITION 

♦39D 

B6BEF5 

LDAA 

SONDATSD 

{GET  THE  SELECTED  TRANSDUCER  8 

♦3A8 

81  81 

CMPA 

•1 

{HAS  IT  8 

♦3A2 

26  86 

BNE 

PUTD2 

;NO  CONTINUE  SEffiCH 

♦3A4 

86  38 

LDAA 

!'♦' 

♦3A6 

A7  88 

STAA 

M 

♦3A8 

28  36 

BRA 

PUTD8 

;GO  PUT  DISTANCE  READING 

♦3AA 

81  82 

PUTD2 

CHPA 

•2 

{HAS  IT  1 

♦3AC 

26  86 

BNE 

PUTD3 

;NO  CONTINUE  SEARCH 

♦3AE 

86  31 

LDAA 

»'!' 

♦3B8 

A7  88 

STAA 

M 

♦3B2 

28  2C 

BRA 

PUTD8 

;GO  PUT  DISTANCE  READING 

♦3B4 

81  84 

PUTD3 

CHPA 

14 

{HAS  IT  2 

♦3B6 

26  86 

BNE 

PUTD4 

;NO  CONTINUE  SEARCH 

♦3B8 

86  32 

LDAA 

•'2' 

♦3BA 

A7  88 

STAA 

♦,X 

♦3BC 

28  22 

BRA 

PUTD8 

;GO  PUT  DISTANCE  READING 

♦3BE 

81  18 

PUTD4 

CHPA 

8818H 

.  {HAS  IT  4 

8X8 

26  86 

BNE 

PUTD5 

;NO  CONTINUE  SEARCH 

1X4 

A7  04 

STM 

4,X 

•3C4 

24  18 

BRA 

PUTD8 

; GO  PUT  DISTANCE  READING 

1X8 

81  24 

PUTD5 

cm 

M24H 

;WAS  IT  5 

•3CA 

26  46 

BNE 

PUTB6 

; NO  CONTINUE  SEARCH 

•3CC 

84  35 

LDM 

•'5' 

•3CE 

A7  44 

STM 

•*x 

•3D4 

24  4F 

BRA 

PUTD8 

;G0  PUT  DISTANCE  READING 

4302 

81  44 

PUTD4 

cm 

AAAftJ 

{HAS  IT  4 

#304 

24  46 

BNE 

PUTD7 

; NO  CONTINUE  SEARCH 

•306 

84  34 

LOM 

•'4' 

•308 

A7  44 

STM 

•*x 

•3DA 

24  44 

BRA 

PUTD6 

;G0  PUT  DISTANCE  READING 

•3DC 

84  2A 

PUTD7 

LDM 

#'*' 

•3DE 

A7  44 

STM 

•3E« 

84  BE  F4 

PUTD8 

LDM 

SONDATRD 

{GET  TIE  DISTANCE  READING 

•3E3 

CE  45  5A 

LDX 

•LNDREADINO 

{POINT  TO  THE  LINE  POSITION 

•3E4 

BDEDSF 

JSR 

SONPRINT 

{CONVERT  TIE  READING  TO  DECIMAL 
{AND  PUT  IT  IN  TIE  LINE  BUFFER 

4X9 

39 

1 

RTS 

{RETURN  TO  CALLER 

1 

1 

SUeROUTHC: 

PUTLINE 

PUT  LINE  BUFFER  IN  SPOOLER  BUFFER 

•3EA 

CE  45  25 

FJ7LINE 

LDX 

•LNSTART 

, 'POINT  TO  START  OF  LIIC  BUFFER 

•3ED 

FF  BF  CC 

sn 

AOOL 

(3Ft 

CE  45  45 

LDX 

4UEND+6 

{POINT  TO  END  OF  LINE  BUFFER 

•3F3 

FF  BF  CE 

STX 

AOOH 

4X4 

FE  45  4C 

LDX 

SPBUFNX 

{POINT  TO  POSITION  OF  SPOOLER  BUFFER 

•3F9 

FF  BF  CA 

sn 

MR 

4XC 

BDE4  44 

JSR 

IWEt 

;NOVE  THE  LIRE 

•3FF 

39 

1 

1 

RTS 

{  SUBROUTINE: 

I 

DECBLEFT 

DECREMENT  BY  >4  THE  AMOUNT  LEFT  IN 
TIE  SPOOLER  BUFFER 

4444 

FE  45  4A 

! 

DECBLEFT  LDX 

BUFLEFT 

4443 

C6  40 

LDAB 

144 

4445 

X 

SHI 

4444 

4E 

FC8 

40EH 

4447 

FF  45  4A 

sn 

BUFLEFT 

444A 

39 

RTS 

! 

SUBROUTINE!  ADDLEFTPR 


ADD  64  TO  THE  NUMBER  LEFT  TO  PRINT 


1 

I 


•44B 

FE  45  66  ADCLEFTPR  LDX 

LEFTPR 

MC 

C6  44 

LDAB 

•64 

•411 

3F 

SHI 

•411 

•A 

FOB 

i|MJ 

fPfl 

•412 

FF  45  66 

ST* 

LEFTPR 

•415 

39 

I 

? 

RTS 

;  SUGROUriNEt 

1 

ADOBUFN* 

MO  64  TO  TIC  ICH  BUFFER  POINTER 

•416 

FE  45  6C 

\ 

AD06UFNX 

ID* 

SPBUFNX 

{GET  TIC  PRESENT  'NEXT  LINE' 

{POINTER 

•419 

C6  4« 

LDAB 

H44H 

{ELSE  ADD  64  TO  THE  POINTER 

•41B 

3F 

SHI 

•41C 

•A 

FCB 

fwfl 

•41D 

8CA4M 

CPI 

•SPBUFEJBM 

{IS  IT  THE  ENO  OF  TIC  BUFFER? 

•424 

27  *4 

BED 

AD08UF2 

{IF  YES  RESET  TO  START  OF  BUFFER 

•422 

FF45  6C 

ST* 

SPBUFNX 

:  STORE  THE  NEW  POINTER 

•425 

39 

RTS 

{RETURN  TO  CALLER 

•426 

CE2I* 

ADDBUF2 

ID* 

•SPBUFSTAR 

{POINT  TO  THE  STMT  OF  THE  BUFFER 

•429 

FFW6C 

ST* 

SPBUFNX 

{STORE  THE  l£H  POINTER 

•42C 

39 

i 

RTS 

{RETURN  TO  CALLER 

SUBROUT  IIC:  SONSWITCH  SUITOES  TIC  SELECTED  SONAR 

TRANSDUCERS  IN  A  PATTERN  CONTAINED  IN  A 
USER  DEFINED  TABLE.  BEFORE  ENTRY,  SONCHANGE 
MUST  BE  155 


•42D 

FE  64  58 

SONSUITCH 

LDX 

PTABNEXT 

{GET  POINTER  TO  ICXT  TABLE  ENTRY 

•434 

A6M 

LDAA 

•,X 

{GET  TABLE  ENTRY  FOR  A  SONAR 

•432 

B7  6EE2 

STAA 

SONNE XA 

{STORE  THE  TRANSDUCER  SELECT  BYTE 

•435 

A6«l 

LDAA 

1.X 

{GET  TABLE  ENTRY  FOR  B  SONAR 

•437 

B7BEE3 

STM 

SONNEXB 

{STORE  THE  TRANSDUCER  SELECT  BYTE 

•43A 

A6  02 

LDAA 

2.X 

{GET  TABLE  ENTRY  FOR  C  SONAR 

•43C 

B7BEE4 

STM 

SONNEXC 

{STORE  THE  TRANSDUCER  SELECT  BYTE 

•43F 

A6  43 

LDM 

3,1 

{GET  TABLE  ENTRY  FOR  D  SONAR 

•441 

B7  BE  E5 

STM 

SOMCXD 

{STORE  THE  TRANSDUCER  SELECT  BYTE 

•444 

7FBEE1 

CLR 

SONCWWGE 

{TELL  TICHAN2  TO  CHANGE  THE  SONARS 

•447 

8C  04  E9 

SOICND 

CPX 

•PTAB2END 

;IS  THIS  THE  LAST  OF  THE  TABLE? 

•44A 

26  47 

BNE 

S0NSH2 

{IF  NO  THEN  BRANCH 

4AAT 

VTtt 

CE44  BD 

S0NEND2 

LDX 

IPTAB2 

{ELSE  RESET  TO  START  OF  TABLE 

•44F 

FF  W  5B 

STX 

PTABNEXT 

{STORE  THE  POINTER 

B-ll 


1*52 

39 

RTS 

•453 

«e 

SCNSW2 

1NX 

•454 

•8 

1NX 

•455 

•8 

m 

•456 

•8 

1NX 

•437 

FFM5B 

STX 

PTA64CXT 

M5A 

39 

RTS 

•458 

M  00 

PTABNEXT 

FOB 

PTAB2 

•450 

•1  MMM 

PTAB1 

FCB 

!»•,••• 

•461 

♦9  81  MM 

FC8 

•465 

M  Nil  H 

.  FCB 

•,M,« 

•469 

NNH  »1 

FCB 

•,•»•»! 

•460 

42  Ntt  N 

FCB 

2,«.M 

•471 

(4(2NN 

FCB 

•475 

NN(2M 

FCB 

•,•,2,8 

•479 

MMM*2 

FCB 

•470 

M  MMM 

FCB 

•481 

NMRN 

FCB 

M.M 

•485 

NNNN 

FOB 

M.M 

•489 

MMMM 

FCB 

8.M.4 

•480 

U  MMM 

FCB 

•491 

M  !8M  M 

FCB 

•495 

H44  1IN 

FCB 

M.IM 

•499 

NNNIt 

FCB 

•,•,•,  16 

•490 

2»  NWM 

FCB 

32,M,t 

MAI 

N24NN 

FCB 

•,32,M 

•4A5 

MM28M 

FCB 

MA9 

NNN2I 

FCB 

8,8.8,32 

MAD 

4tNNN 

FCB 

64.M,* 

MB1 

N48NN 

FCB 

•,64,M 

MB5 

WNHH 

FCB 

•.•.64,« 

MB9 

NNH« 

PTAB1END 

FCB 

•,•,•,64 

•460 

41  N  41  N 

PTAB2 

FCB 

•4C1 

44  41  48  N 

FCB 

MC5 

<2  4((2(t 

FCB 

2,8,2,t 

MC9 

44  (2  4(t2 

FCB 

•,2,8,2 

MCD 

44  44  44  44 

FCB 

4,M,« 

MD1 

MM  MM 

FCB 

M,M 

MD5 

11  44  It  M 

FCB 

16,8,16,8 

MD9 

M  11  M  It 

FCB 

8,16,8,16 

MOD 

24  44  24  M 

FCB 

32, •, 32, • 

•4E1 

44  24  44  28 

FCB 

8, 32, t  32 

ME5 

48  M  48  M 

FCB 

64, 8, 64, • 

ME9 

44  44  44  44 

PTAB2END 

FCB 

8,64,9,64 

MED 

•1  82  M  M 

PTAB3 

FCB 

l|2,4,t 

MF1 

82  M  M  81 

FCB 

2,4,8, 1 

MF5 

M  88  81  82 

FCB 

4, 9, 1,2 

MF9 

M  81  82  M 

FCB 

8, 1,2,4 

•4FD 

18  28  48  M 

FCB 

16,32,64,8 

•581 

28  48  88  18 

FCB 

32,64,9, 16 

•585 

48  88  18  28 

FCB 

64,8,16,32 

•509 

88  18  28  48 

PTAB3END 

FCB 

8,16,32,64 

;AND  RETURN  TO  CALLER 
{POINT  TO  NEXT  TABLE  ENTRY 


{STORE  TIE  POINTER 
{RETURN  TO  CALLER 


•54D 

•1 

•1 

•1 

•1 

PTAB4 

FC8 

1, 1,1,1 

1511 

•2 

•2 

•2 

•2 

FC8 

2, 2, 2, 2 

1515 

•4 

•4 

•4 

•4 

FOB 

4, 4,4,4 

1519 

1# 

If 

1# 

11 

FCB 

14, 14, 14,14 

#5  ID 

2f 

2t 

21 

21 

FOB 

32,32,32,32 

•521 

41 

41 

44 

41 

PTAB40C 

FOB 

44,44,44,44 

THE  FOLLOWING  FORMAT  IS  USED  FOR  M  DATA  FllEt 

/tiM/fw/1wl/1w2/rwl/r«2/A« _ /B» _ /C* _ /W _ /  <CR>  <LF> 

HERE  tiN  •  TENTH'S  CF  SECONDS  COUNT  -  2  BYTES 
fw  •  FRONT  MR  POSITION  -  1  BYTE 
1*1,  r*  *  REAR  WHEEL  COUNTS  -  2  BYTES  EAt 

At  «  SONAR  NUrER  AND  READING  -  4  BYTES  EA. 


•525 

•9 

INST  ART 

FCB 

•9H 

•524 

2F 

UfiUF 

FCC 

•r 

•527 

74  49  40  45 

LNT1NE 

FCC 

'tiN/' 

•52B 

2F 

•52C 

44  77  2F 

LNFU 

FCC 

•w 

•52F 

42  4C  77  31 

LMLU1 

FCC 

'bW/' 

•533 

2F 

•534 

44  4C  77  32 

UFLU2 

FCC 

'flN2/' 

•538 

2F 

•539 

42  72  77  31 

LMRUl 

FCC 

'bn»l/' 

•530 

2F 

•53E 

44  72  77  32 

•JFRU2 

FCC 

'fr«2/A' 

•542 

2F  41 

•544 

23 

LNATRANS 

FCC 

•545 

5F  5F  5F  5F 

LNAREADINO 

FCC 

' _ /B' 

•549 

2F  42 

•54B 

23 

LNBTRANS 

FCC 

'1' 

054C 

5F  5F  5F  5F 

LNEREADING 

FCC 

' _ /C' 

•554 

2F  43 

23 

LNCTRANS 

FCC 

'1' 

•553 

5F  5F  5F  5F 

LNCFcADING 

FCC 

' _ /V 

•557 

2F  44 

•559 

23 

LNCTRANS 

FCC 

'1' 

•55A 

5F  5F  5F  5F 

LNEREADING 

FCC 

' _ /' 

•55E 

2F 

•55F 

•DMMM 

LNEND 

FC8 

•DH.3AH, •,«,•,• 

•543 

W  M 

♦545 

M 

NEXOFF 

FCB 

• 

•544 

W  W 

LEFTPR 

FDB 

1 

•548 

28  •• 

NXCHPR 

FDB 

SPBUFSTAR 

•56A 

88  •• 

BUFLEFT 

FDB 

mm 

•56C 

28  W 

SPBUFNX 

FDB 

SPBUFSTAR 

•54E 

28  W 

SPBUFST 

FDB 

SPBUFSTAR 

MAAA 

ORG 

AOM All 

V^XnTvn 

2 m 

SPBUFSTAR 

RUB 

•7FFFH 

9FFF 

SPBUFEND 

END 

No  orroMs) 


SYMBOL  TABLE  FOR  FILE  XTENO.A 


A.C 

tm 

A.RX 

•441 

A.S 

4404 

A.TX 

4441 

ACIAT 

AAA| 

vvvy 

ADDHJF2 

•424 

ADDRfNX 

4416 

ADuH 

BFCE 

ADDL 

GFCC 

ADOLEFTP 

•44B 

ADR 

BFCA 

ASCI IL 

E7EC 

ASCI IR 

E7F4 

BJFLEFT 

456A 

CALLRDSO 

4I2E 

CANTATA 

4126 

DEC8LEFT 

4444 

FWCOJNT 

HEF7 

INIT 

ECFC 

INTHASK 

EEEE 

INTPTMV 

EBFB 

10 

cm 

LEFTPR 

•566 

LNAAEAD1 

4545 

UWTRMS 

1544 

U&H1 

•52F 

LNBREADI 

454C 

LNBRU1 

4539 

LNBTRANS 

454B 

UflSUF 

•526 

LUCRE  AD  I 

•553 

LNCTRANS 

4552 

LNDREAOI 

455A 

LNDTRANS 

•559 

LNEND 

•55F 

UflH2 

4534 

LNFRH2 

•53E 

uw 

•52C 

LNSTART 

4525 

LNTIIC 

•527 

LWCOUNT I 

BEFD 

LUC0UNT2 

BEFF 

HAININ1T 

4144 

MEXOFF 

•565 

HORET1C 

BEC7 

novel 

E646 

NXCHPR 

4568 

PTAB1 

•45D 

PTABiEND 

•489 

PTAB2 

44BD 

PTAB2END 

44E9 

PTAB3 

MED 

PTAKOffi 

1549 

PTAB4 

•540 

PTAB4EN0 

4521 

PTAREXT 

•45B 

PUT2HEX 

•253 

FUTA 

42AA 

PUTA2 

•2BA 

PUT A3 

•2C4 

PUTA4 

•2CE 

PITTAS 

•208 

PUTA6 

•2E2 

PUTA7 

•2EC 

PUTA8 

•2F4 

PITTB 

•2FA 

PUTB2 

434A 

PUTB3 

•314 

PUTB4 

•31E 

PUTB5 

•328 

PUTB6 

4332 

PUTB7 

•33C 

PUTB8 

•344 

PUTC 

•34A 

PUTC2 

•35A 

PUTC3 

4364 

PUTC4 

•36E 

PUTC5 

•378 

PITTC6 

•382 

PUTC7 

•38C 

PUTC8 

•394 

PUTD 

•39A 

PUTD2 

•3AA 

PUTD3 

•384 

PUTD4 

43BE 

PUTD5 

•3C8 

PUTD6 

•3D2 

PUTD7 

•3DC 

PUTD8 

•3E4 

PITTFU 

•262 

PUTLINE 

•3EA 

PUTLW 

•26C 

PUTRH 

•28B 

punin 

•243 

READSONA 

EA54 

RUCOUNTI 

BEF9 

RHC0UNT2 

BEFB 

SONCHANG 

BEE1 

SONDATRA 

BEF4 

S0NDATR8 

BEF2 

SONDATRC 

BEF4 

SONDATRD 

BEF6 

SONOATSA 

BEEF 

SONOATSB 

BEF1 

SONDATSC 

BEF3 

SONDATSD 

BEF5 

SOtEND 

•447 

S0TEND2 

•44C 

SONNEXA 

BEE2 

SORNEXB 

BEE3 

SONNEXC 

BEET 

SONNEXD 

BEES 

SONPRINT 

ED5F 

S0NSH2 

•453 

SONSHITC 

•42D 

SPBUFEND 

9FFF 

SPBUFNX 

•56C 

SPBUFST 

•56E 

SPBUFSTA 

2444 

TICTIME 

BED9 

TSTRX 

•I9A 

TSTRX2 

•ICS 

TSTRX3 

•IAC 

TSTRX4 

•IB7 

TSTRX5 

•1C8 

TSTRX6 

41E5 

TSTRX7 

4242 

TSTRX8 

421F 

TSTRX9 

•23C 

TUSRAM 

BC44 

TWIDDLE 

•HE 

UPNXCHPR 

•189 

XOFF 

•413 

XON 

4411 

XTEND 

4121 

XTEND2 

•161 

XTEND3 

416C 

XZERO 

m* 

B-14 


APPENDIX  C 


19  ' 

26  'DATE:  25  OCT  84 
38  ' 

49  'HtHHHHt  MAPPER  H#H«M« 

56  ' 

66  'THIS  PROGRAM  IS  DESIGNED  TO  RUN  ON  A  TRS-86  COLOR  CWPUTER 
76  'IT  IS  WRITTEN  IN  MICROSOFT  DISK  EXTENDED  COLOR  BASIC 
86  'THE  PURPOSE  Of  THIS  PROGRAM  IS  TO  TRANSFORM  SOW«  READINGS 
85  'FROM  THE  AFIT  ROBOT  HARRS- 1  INTO  GRAPHICS  FORMAT 
96  'THE  TEST  ROOM  IS  13'  X  22'  AND  EACH  PIXEL  REPRESENTS  6.1  FT 
166  'PRX'RAM  CONCEIVED  AND  WRITTEN  BY  CtfT  HUBERT  G.  SOICIDER  III 
116  ' 

126  ' 

136  ' 

146  ' 

156  'MEMORY  INITIALIZATION 

166  CLEAR16O6,4H6FFFiPCLEAR8:PM00E4,1jDEFUSR6  «  6H7666 
176  LOAON-ANDPAGE1 
186  PM0DE4t5:PCLSltPn00E4,ltPCLSl 
196  ' 

266  ' 

216  ' 

226  ' 

236  ' 

246  'GLOBAL  DECLARATIONS 

256  Ll=6:L2=6:L3=6iL4=6:L5=6:Rl=6:R2*6:R3=6:R4=6:R5«6:LW«6:RW=6 

266  D=17. 75: 'DISTANCE  BETWEEN  REAR  WHEELS  IN  INCHES 

276  SN4='A6A4A1A5A2A6B6B4B1B5B2B6C6C4C1C5C2C6L6D4D1[95D2D6*: '  SONAR  LOOKUP  TABLE 

286  C  *  6: 'COLOR 

296  PI  »  3.14159 

366  ' 

316  'THE  FOLLOWING  FORMAT  IS  USED  FOR  THE  DATA  FILE: 

326  7tiiw/fw/lul/l*2/rwl/rw2/Ai _ /B# _ /C* _ /Dl _ /  <CR>  <LF> 

336  'WHERE  tiM  a  TENTH'S  OF  SECONDS  COUNT  -  2  BYTES 

346  '  f*  =  FRONT  U€EL  DIRECTION  -  l  BYTE 

35P  '  lkf.rvt  =  REAR  WHEEL  COUNTS  -  2  BYTES  EA. 

366  '  At _  =  SONAR  NUMBER  WD  READING  -  4  BYTES  EA. 

376  ' 

386  '(WIN  PROGRAM 
396  ' 

466  '  GET  INITIAL  INFORMATION 
416  GOSUB  1916 

426  ' 

436  '  GET  DRIVE  NUMBERS 

446  GGSUB1996 

456  ' 

466  '  OPEN  DATA  FILE 

476  GOSUB  2686 

486  ' 

496  '  READ  IN  DATA 
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FOR  I-1T06 


540 

559 

569 

579 

589 

599 

699 

519 

529 

539 

549 

559 

569 

679 

689 

699 

799 

719 

729 

739 

749 

759 

769 

779 


LINE INPUT  II, SO* 

IF  E0F(1)=-1  THEN  729  t 'CHECK  FOP  ND  OF  FILE 
FOR  J=1T0U 
Pl«INSTRa,SW,V) 

A*=LEFT*(SD*,P1-1) 

CM  J  GOSUB  840,870,939,969, 1999, 1949, 1989, 1599, 1509,1599, 1599 
SO**RIGHT*(SO*,LEN($0*)“P1> 

NEXT  J 
NEXT  I 

6=USR0(0)  : 'CALL  It  ROUTINE  "ANDPAGE1 

2*=INKEY*:  IFZ*=,"THEN322  i '  THESE  LINES  N£  FOR 
IF  29*-S-  THEN  339  ELSE  369  TWE  OPTION  OF  SAVING 


i*  EACH  INCREMENTAL 
s'  PICTURE  OF  WHAT  THE 
i'  SONARS  'SEE1 


SAVE  PICTURE 

F*=TIME**\BIN{,+DN* 

GOSUB1839 

GOTO  499  {'CONTINUE 

CLOSE  DATA  FILE 
GOSUB  2129 


SAVE  COMPOSITE  PICTURE 

FOR  X*  5  TO  8:PC0PY  X  TO  X-4:NEXT  XjFMlt+’ICCKVBINi’+DNt 
G0SUB1839 


789  ' 

799  END 

899  'wmwwoffi  OF  PROGRAM********** 

819  ' 

829  'WHHMHHSUBRttJTINES*********** 

839  ' 

849  'FIND  FIRST  DELIMITER  IN  DATA  STRING  (V) 

859  RETURN 
869  ' 

879  'GET  TINE 

889  'TIC  -  COUNT  FROM  ROBOT 

899  'TIME*  -  DECIMAL  COUNT 

999  IF  1=1  THEN  TIME*=T1*+’|-+A*  ELSE  RETURN 

919  RETURN 

929  ' 

939  'CONVERT  FWCOUNT  TO  A  VALUE 
949  FW  =  VALCiH'+A*)  {RETURN 
959  ' 

969  'CONVERT  LNCOUNT1  TO  A  VALUE  (LEFT  WHEEL  BACKWARDS) 
979  LW=VALC6H**A*) 

989  LI  =  LW-L4; L4=LW: RETURN 
999  ' 

1909  'CONVERT  LWCOUNT2  TO  A  VALUE  (LEFT  WHEEL  FORWARDS) 
1919  LW^CW+A*) 


1029  12  >  LU-L3:15=LW:  RETURN 
1131  ' 

1649  'CONVERT  RWCOUNT1  TO  A  VALUE  (RIGHT  WHEEL  BACKWARD,') 

1656  RW^ftCiH'+At) 

1669  Rl>  RW-R4iR4=RW: RETURN 
1676  ' 

1686  'CONVERT  RWCOUNT2  TO  A  VALUE  (RIGHT  WHEEL  FORWARDS) 

1696  RW=VAL(*4H**A$) 

1166  R2  «  RW-R5:R5=RU:OOSUB1116:PSCT(X(Y10) (RETURN 
1116  ' 

1126  'CALCULATE  POISITION  AND  HEADING 

1136  G0SUB1189  : 'FIRST  CALCULATE  IN  INO€S 

1146  GOSU61436  :  'THEN  CONERT  TO  GRAPHICS  FORMAT 

1156  XA=XB:YA«YB 

1166  RETURN 

1176  ' 

1186  '  DETERMINE  HEADING  &  POSITION 

1196  '  HEADING  &  POSITION  ARE  RELATIVE  TO  THE  CENTER  POINT  BETWEEN  THE  WHEELS 

1266  '  WHILE  THE  SONAR  READINGS  ARE  RELATIVE  TO  THE  CENTER  OF  THE  ROBOT 

1216  '  <XA,YA)  -  PREVIOUS  POSITION 

1226  '  (XB,YB)  -  CURRENT  POSITION 

1236  '  HA  &  HB  ARE  IN  RADIANS 

1246  '  M  -  INITIAL  HEADING 

1256  '  HB  -  CURRENT  HEADING 

1266  '  H  -  GRAPHICS  HEADING  (9-1) 

1276  '  D  -  DISTANCE  BETWEEN  **iEELS  (  17.75*  ) 

1286  »  «*  NOTE  «* 

1296  '  FOR  PURPOSES  OF  THIS  TEST  AND  THESIS, 

1366  '  THE  UPPER  LEVEL  SONARS  HILL  REMAIN  IN  A  FIXED  POSITION 

1316  '  DURING  THE  TEST  (I.E.  NO  tCAD  MOVEMENTS. 

1326  ' 

1336  L3  *  L2:R3  >  R2 
1346  DLR  *L5-R5 
1356  HB  =(DLR/D)  ♦  HA 
1366  HC<0S(I1B);HS=SIN(HB) 

1376  XB  =  XA  ♦((  (R3+4-3)/21  *  HC) 

1386  YB  *  YA  +(((R3+L3)/2)  *  HS) 

1396  'NORMLIZE  HEADING 

1466  H  =  HB/(2*PI):IF  H  <  0  THEN  H  =  1  ♦  H  ELSE  IF  H=«  THEN  H»i 

1416  IF  H>1  THEN  H*H-lsGOTO  1416 

1426  RETURN 

1436  '  GET  (X,Y) 

1446  '  THIS  ROUTIft  CONVERTS  THE  (XB,YB)  LOCATIONS  INTO  INTEGER  NUMBERS 

1445  '  SO  THAT  EACH  PIXEL  REPRESENTS  6. 1  FT 

1456  '  X  OFFSET  ->  17,  Y  OFFSET  ->  36 

1466  X=INT(«XB+<6*HC))*16)/12M7 

1476  Y=INT(((YB+(6*HS))«10)/12H36 

1486  RETURN 

1496  ' 

1566  '  DISPLAY  SONtt  DATA 

1516  A14=LEFT4(A4,2)sA2i=RIGHT4(A$,liN(AI)-2) 

1526  G0SUB1556:G0SUB1686:00SUB1746 


C-3 


153#  RETURN 
15#  * 

1559  '  CALCULATE  DIRECTION  OF  SONAR  BEAK 
1569  'All  -  SONAR  NUMBER 
1579  'H  -  HEADING  (9-1) 

1589  'SI  -  START  ARC  POSITION 
1599  'S2  -  STOP  ARC  POSITION 
1699  IF  H*1  THEN  R=9 
1619  SN=INT((INSTR<l,SN$,Att)/2)) 

1639  $1*  -.925+(SN/24)+H 
1649  S2--S1+  .95 
1659  IF  H*9  THEN  H«1 
1669  RETURN 
1679  ' 

1689  '  CALCULATE  RADIUS  (RANGE  OF  TARGET) 

1699  R»  VAL(A?I)*19 

1799  IF  (R>75  OR  R<18  OR  R=255)  THEN  R  ■  9 
1719  IF  RIGHTHAli.l)*'*'  THEN  R«9 
1729  RETURN 
1739  • 

1749  '  DRAW  SONM  ARC 

1759  '  X  -  X  DIRECTION  -  GRAPHICS  LOCATION 

1769  '  Y  -  Y  DIRECTION  -  GRAPHICS  LOCATION 

1779  '  R  -  RADIUS 

1789  '  C  -  COLOR 

1799  IF  SKI  THEN  CIRCLE(X1Y),R,C1l,Sl+l,«sCIROE(XfY),RlCtlt9,S2  ELSE  CIRCLECX, Y) ,RtCt  1 , SI VS2 
1819  RETURN 
1829  ' 

1839  '  SAVE  SONAR  PICTURE 

1849  FR=FREE(DN):IF  R<  3  THEN  1859  aSE  1879 

1859  SOUND109, 19:CLS:PRINT*  DISK  FULL!!!!* 

1855  PRINT'PLEASE  CHANGE  DISK  IN  DRIVE  NUMBER  'IK*  AND  PRESS  ENTER  TO  CONTINUE' 

1869  Z4=INKEY4:  IFZ4S"THEN1869  aSE  1849 
1879  SAVEM  Ft,&HE99,&H25FF,&H9999 
1889  SCREEN! , 1 
1899  RETURN 
1999  ' 

1919  '  GET  INITIAL  HEADING  WD  POSITION 

1929  CLS: PRINT'PLEASE  INPUT  INITIAL  HEADING  MDPOSITION  OF  ROBOT  FOR  THIS  TEST  RUN.' 

1925  PRINT-POSITION  IN  TERMS  OF  (X,Y)' 

1927  PRINT'WHERE  X  AND  Y  ARE  TENTHS  OF  FEET AND  HEADING  IS  BETWEEN  9  AND  1.' 

1939  INPUT'HEADING* ;H:HA=2*PI*H:  IF  M=0  THEN  M=2*PI 

1949  INPUT-POSITION  X"; X: INPUT-POSITION  Y*;Y:XA=i.2*X:YA=1.2*Y 

1950  PR.  JT" INPUT  DATA  FILENAME':PRINT:LINEINPUT  Tll:Tf=TU*'/DAT' 

1969  RI=mW(T14,3,l);'  GET  ROOM  CONFIGURATION  NUMBER 

1979  RETURN 
1999  ' 

1999  '  GET  DRIVE  NUMBERS 

2999  CLS-.PRINT'  WELCOME': PRINT*  TO  THE  LAB  OF  MAKE  BELIEVE!' 

2919  PRINT:PRINT: PRINT 

2029  PRINT'WHICH  DRIVE  MS  THE  SONAR/OSE  DATA  IN  IT?' 

2939  A4=INKEYI:  IF  A4="THEN  2939 


C-4 


2040  AaVflL(fll)j  IF  A=  0  TTEN  DN  «  1:DR1VE(0)|ON4«*1*  ELSE  IF  A»1  THEN  DN  *  0:DRIVE(lhON4«*0*  ELSE  2030 
2050  PRIHTsPRIHT"  THANK  YOU* 

2060  RETURN 
2070  * 

2080  *  OPEN  FILE 

2090  OPEN*I\»1,T0 
2100  RETURN 
2110  » 

2120  '  CLOSE  FILE 

2130  CLOSE  01 
2140  RETURN 
2150  ' 

2160' 

2170  ' 

2190  ' 

2191  *  i***^*x****~***~^^*x****^ 

2210  '«  * 

2220  '•  NAMEi  ANDPAOE  * 

2230  ’*  WRITTEN  IN  6809  MACHINE  CODE  * 

2240  '«  THIS  ROUTIfC  fWKES  A  COMPOSITE  OF  H'RRS-I  • 

2250  '*  SONAR/OSE  DATA  BY  ANDING  Oft  PAT*  ..  ^rfUICS  * 

2260  '*  WITH  ANOIHER.  THIS  PROGRAM  DCS  0  RUN  « 

2270  '*  ON  A  TRS-80  COLOR  COfPUTER  * 

2290  '•  • 


2290  '»*• ***" 

imnni 

ffwnvvf 

■iiiiiiiiii 

HUttMitttnitHttHHMMttMt 

2300  ' 

0R6 

17000 

2310  * 

PSHS 

Y 

•SAVE  Y  REGISTER 

2320  ' 

LDX 

04E00 

•START  OF  PAGE  1 

2330  * 

LDY 

042600 

•START  OF  PAGE  2 

2340  *  LOOP 

LDA 

,*♦ 

•GET  BYTE  FROM  PAGE  1 

2350  * 

ANDA 

.v 

•AND  IT  WITH  BYTE  FROM  PAGE  2 

2360  ' 

STA 

•STORE  BACK  IN  PAGE  2 

2370  * 

CMPI 

042600 

•DONE  YET? 

2380  ' 

BNE 

LOOP 

•IF  NOT  CONTINUE 

2390  ' 

PULS 

Y 

•GET  BACK  Y 

2400  ' 

RTS 

•RETURN 

2410  ' 

END 

•  HtHHHtHHtHtlHtHttllHIHIHHHHHHHH 

1 *  * 

{«  APPENDIX  0  • 

;*  ♦ 

■  HHHHHtHHHfltfHIttHHIHHtHIHHHUm 

|  FILEi  NAVDEF.A 

MM  g*t  ntvdtf.t  ;NAV  COMPUTER  EQUATES  AND  SYS  RAN  USAGE 

I 

{  NAVDEF.A  DEFINES  THE  INPUT/OUTPUT  AND  SYSTEM  Rtf!  USAGE  FOR 
;  THE  MARRS- 1  NAVIGATION  CCT,*VrER 


I 


BCM 

TUSRAM 

EQU  *BCMH 

BEM 

OSRAN 

EQU  TUSRAMU2MH 

BEM 

USRSTAK 

EQU  OSRAM 

BE7F 

BOS 

EQU  0SRANM7FH 

I 

; 

; 

;  INPUT/OUTPUT  EQUATE 


J 

1 


CM* 

10 

1 

EQU  *CM*H 

|AAA 

VfW 

; 

ACIAT 

EQU  * 

MM 

A.T 

EQU  ACIAT 

MM 

ACIAX 

EQU  8 

AAAA 

vWO 

A.X 

EQU  ACIAX 

Mil 

ACIAL 

EQU  16 

MU 

A.L 

l 

EQU  ACIAL 

M18 

l 

PTHAB 

EQU  24 

M18 

T.AB 

EQU  PTHAB 

M2* 

PTMCD 

EQU  32 

M2* 

T.CD 

EQU  PTMCD 

M28 

PTW 

EQU  4* 

M28 

T.V 

EQU  PTW 

M3* 

PDF 

EQU  48 

M3* 

T.F 

EQUPTMF 

M38 

PTML 

EQU  56 

M38 

T.L 

EQU  PTW. 

M4* 

PTMR 

EQU  64 

M4* 

T.R 

I 

EQU  PTMR 

M48 

I 

PIAAB 

EQU  72 

M48 

P.AB 

EQU  PIAAB 

M5* 

PIACD 

EQU  8* 

M5* 

P.CD 

EQU  PIACD 

;T0P  OF  USER  STACK  RAM  (STACKS  GROW  DOWNWARD) 
{BASE  ADDRESS  FOR  OPERATING  SYSTEM  RAN 
{USER  STACK 

{BOTTOM  OF  OPERATING  SYSTEM  STACK  (BOS) 


{BASE  ADDRESS  FOR  ALL  INPUT/OUTPUT 

{TERMINAL  ACIA  OFFSET  FROM  I/O  BASE  ADDRESS 
{XTRA  ACIA  OFFSET  FROM  I/O  BASE  ADDRESS 
{LASER  ACIA  OFFSET  FROM  I/O  BASE  ADDRESS 

{SONAR  AAB  TIMER  OFFSET  FROM  I/O  BASE  ADDRESS 
{SOW*  CAD  TIMER  OFFSET  FROM  I/O  BASE  ADDRESS 
;VSW  DRIVE/TIC  TIMER  OFFSET  FROM  I/O  BASE  ADDRESS 
{FRONT  UtEEL  TIMER  OFFSET  FROM  I/O  BASE  ADDRESS 
{LEFT  WHEEL  TIMER  OFFSET  FROM  I/O  BASE  ADDRESS 
{RIGHT  WHEEL  TI)€R  OFFSET  FROM  I/O  BASE  ADDRESS 

{SONAR  AAB  TRANSDUCER  SELECT  PIA  I/O  OFFSET 
{SONAR  CAD  TRANSDUCER  SELECT  PIA  I/O  OFFSET 


»  - - 

i  * 

....... 

*’***“•* 

«  »  *  *  •  '  v*"'  •"  *  * 

ii 

1*1 

h 

►\  » 

ewi 

At 

EQU  1 

;«ASK  BIT  TO  SELECT  SONAR  TRANSDUCER  A® 

•M2 

A1 

EQU  2 

j MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  A1 

i 

W®4 

A2 

EQU  4 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  A2 

mi 

A3 

EQU  8 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  A3 

Ml* 

A4 

EQU  16 

•.MASK  BIT  TO  SELECT  SONAR  TRANSFER  A4 

\ 

W2® 

AS 

EQU  32 

5 MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  AS 

\ 

W4® 

A6 

EQU  64 

; MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  A6 

t 

AM i 

Vwf 

A7 

EQU  128 

;MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  A7 

1 

•Ml 

M 

EQU  1 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  8® 

•M2 

B1 

EQU  2 

;MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  B1 

AAAI 

VV\n 

B2 

EQU  4 

;MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  B2 

AAAA 

wvO 

B3 

EQU  8 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  B3 

» 

Ml® 

84 

EQU  16 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  B4 

r. 

M2® 

85 

EQU  32 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  B5 

M 

MM 

86 

EQU  64 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  B6 

M8® 

87 

EQU  128 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  B7 

•Ml 

C® 

EQU  1 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  W 

*’  , 

•M2 

Cl 

EQU  2 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  Cl 

MM 

C2 

EQU  4 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  C2 

*-r  l 

•M3 

C3 

EQU  8 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  C3 

1 

Ml« 

C4 

EQU  16 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  C4 

M2® 

CS 

EQU  32 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  C3 

MIA 

VVTv 

a> 

EQU  64 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  C6 

*\ .  i 

M8® 

C7 

EQU  128 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  C7 

» . 

•Ml 

W  ■ 

EQU  1 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  D® 

i!  C 

•M2 

81 

EQU  2 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  D1 

MM 

82 

EQU  4 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  B2 

MM 

83 

EQU  8 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  D3 

Ml« 

D4 

EQU  16 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  D4 

.  * 5 

M2* 

85 

EQU  32 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  D5 

»"•  , 

MM 

06 

EQU  64 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  D6 

gl 

MM 

87 

1 

EQU  128 

{MASK  BIT  TO  SELECT  SONAR  TRANSDUCER  D7 

vl 

! 

AAAA 

fVvf 

• 

ACIASTAT  EQU  • 

{OFFSET  FROM  AC1A  BASE  FOR  STATUS  REGISTER 

AAAA 

A.S 

EQU  ACIASTAT 

•• 

•M® 

ACIACR 

EQU  • 

{OFFSET  FROM  ACIA  BASE  FOR  CONTROL  REGISTER 

AAAA 

A.C 

EQU  ACIACR 

i 

•Ml 

ACIATX 

EQU  1 

{OFFSET  FROM  AICA  BASE  FOR  TRANSMIT  REGISTER 

•Ml 

A.TX 

EQU  ACIATX 

*  „ 

•Ml 

AC1ARX 

EQU  1 

{OFFSET  FROM  ACIA  BASE  FOR  RECEIVE  REGISTER 

*  t 

•Ml 

A.RX 

1 

EQU  ACIARX 

I 

•Ml 

1 

PTMSTAT 

EQU  1 

{OFFSET  FROM  PTM  BASE  FOR  STATUS  REGISTER 

•Ml 

T.S 

• 

1 

ECU  PTHSTAT 

AAAA 

fw» 

1 

PTMCR1 

EQU  • 

{OFFSET  FROM  PTM  BASE  FOR  TIMER  1  CONTROL  REGISTER 

AAAA 

vWy 

T.C1 

EQU  PTWCR1 

P 

•Ml 

PTMCR2 

EQU  1 

{OFFSET  FROM  PTH  BASE  FOR  TIMER  2  CONTROL  REGISTER 

[;S 

•Ml 

T.C2 

EQU  PTMCR2 

1 

D-2 

•'v'/v!'. 

*“»  «*.  *\**t  /»  f .  •’ 

MM 

PTMCR3 

ECU  I 

AAAA 

fVVT 

T.C3 

I 

EQU  PTMCR3 

mi 

1 

T.LATCH1  EQU  2 

MM 

T.LATCH2  EQU  4 

ftAjV 

wvO 

T.LATCH3  EQU  6 

I 

mi 

I 

T.CNT1 

EQU  2 

MAI 

T.CNT2 

EQU  4 

MM 

T.CNT3 

I 

EQU  6 

*M1 

I 

PIACRA 

EQU  1 

M41 

P.CRA 

EQU  PIACRA 

•M3 

PI ACRE 

EQU  3 

M*3 

P.CRB 

EQU  PIACRB 

MGl 

PIACRC 

EQU  1 

•Ml 

P.CRC 

EQU  PIACRC 

M93 

PIACRD 

EQU  3 

•M3 

P.CRD 

I 

EQU  PIACRD 

•Ml 

I 

PIASTATA  EQU  I 

•Ml 

P.SRA 

EQU  PIASTATA 

•M3 

PIASTATB  EQU  3 

•M3 

P.SRB 

EQU  PIASTATB 

•Ml 

PIASTATC  EQU  1 

•Ml 

P.SRC 

EQU  PIASTATC 

•M3 

PIASTATB  EQU  3 

•M3 

P.SRD 

I 

EQU  PIASTATB 

MM 

I 

PIADDA 

EQU  • 

•AAA 

vVff 

P.DDA 

EQU  PIADDA 

•M2 

PIADDB 

EQU  2 

m2 

P.DDB 

EQU  PIADDB 

MM 

PIADDC 

EQU# 

AAM 

fwf 

P.DDC 

EQU  PIADDC 

MM 

PIADDD 

EQU  2 

mi 

P.DDD 

• 

I 

EQU  PIADDD 

mm 

I 

PIAPA 

EQU* 

MM 

P.PRA 

EQU  PIAPA 

mi 

PIAPB 

EQU  2 

m2 

P.PRB 

EQU  PItfB 

wvW 

PItfC 

EQU  • 

MM 

P.PRC 

EQUPIAPC 

MG2 

PIAPD 

EQU  2 

m2 

P.PRD 

EQU  PIAPD 

•.OFFSET  FROM  PTH  BASE  FOR  TIMER  3  CONTROL  REGISTER 

;PTM  COUNTER  LATCH  FOR  TIMER  1 
{PTN  COUNTER  LATCH  FOR  TIMER  2 
; PTH  COUNTER  LATCH  FOR  TIMER  3 


;PTN  COUNTER  COUNT  FOR  TIMER  1 
;PTH  COUNTER  COUNT  FOR  TH€R  2 
jPTM  COUNTER  COUNT  FOR  TIMER  3 

;PIA  A  CONTROL  REGISTER  OFFSET  FROM  PIA  BASE 
jPIA  B  CONTROL  REGISTER  OFFSET  FROM  PIA  BASE 
jPIA  C  CONTROL  REGISTER  OFFSET  FROM  PIA  BASE 
;PIA  D  CONTROL  REGISTER  OFFSET  FROM  PIA  BASE 

jPIA  A  STATUS  REGISTER  OFFSET  FROM  PIA  BASE 
;PIA  B  STATUS  REGISTER  OFFSET  FROM  PIA  BASE 
{PIA  C  STATUS  REGISTER  OFFSET  FROM  PIA  Bki. 
jPIA  D  STATUS  REGISTER  OFFSET  FROM  PIA  BASE 

;PIA  A  DATA  DIRECTION  REGISTER  OFFSET  FROM  PIA  BASE 
{PIA  B  DATA  DIRECTION  REGISTER  OFFSET  FROM  PIA  BASE 
{PIA  C  DATA  DIRECTION  REGISTER  OFFSET  FROM  PIA  BASE 
;PIA  D  DATA  DIRECTION  REGISTER  OFFSET  FROM  PIA  BASE 

;PIA  A  PERIPHERAL  REGISTER  OFFSET  FROM  PIA  BASE 
jPIA  B  PERIPHERAL  REGISTER  OFFSET  FROM  PIA  BASE 
;PIA  C  PERIPHERAL  REGISTER  OFFSET  FROM  PIA  BASE 
;PIA  D  PERIPHERAL  REGISTER  OFFSET  FROM  PIA  BASE 


D-3 


SYSTEM  RAH  USAGE  EQUATE  AREA 


I 

♦ 

I 


J 


BE84 

CRACIAT 

EQU  0SRAH+88BH 

BE8i 

CRACIAX 

EQU  0SRAH+481H 

BE82 

CRACIAL 

5 

EQU  OSRAIH82H 

BE83 

J 

CRPTHAB1  EQU  OSRAH+083H 

BE84 

CRPTMAB2  EQU  0SRAH+B84H 

BESS 

CRPTHAB3  EQU  03RAIW85H 

BE86 

CRPTHCD1  EQU  0SHAN+486H 

BE87 

CRPTMCD2  EQU  0SRAM+487H 

BE88 

CRPTRCD3  EQU  0SRAIH«88H 

BE89 

CRPTHV1 

EQU  0SRAH+889H 

CE8A 

CRPTHV2 

EQU  0SRNM8M 

BE8B 

CRPTHV3 

EQU  0SRAH+48BH 

BE9C 

CRPTHF1 

EQU  GSRAN+«8CH 

BE8D 

CRPTHF2 

EQU  OSRAH+08DH 

BE8E 

CRPTHF3 

EQU  0SRAH+B8EH 

BE8F 

CRPTHL1 

EQU  0SRAH+B6FH 

BE9® 

CRPTHL2 

EQU  OSRAH+890H 

BE?1 

CRPTHL3 

EQU  0SRAH+491H 

BE92 

CRPTHR1 

EQU  0SRM+992H 

BE93 

CRPTHR2 

EQU  0SRAH+B93H 

8E94 

CRPTHR3 

1 

EQU  OSRMM94H 

BE93 

I 

CRPIAA 

EQU  0SRAH+895H 

BE96 

CRPIAB 

EQU  0SRAH+496H 

BE97 

CRPIAC 

EQU  0SRAM+G97H 

BE98 

CRPIAD 

I 

EQU  0SRAN+498H 

BE99 

I 

BCPTHAB1  EQU  0SRAH+B99H 

BE9B 

BCPTWAB2  EQU  0SRAH+«9EH 

BE9D 

BCPTNAB3  EQU  0SRAH+Q9DH 

BE9F 

BCPTHCD1  EQU  OSRAM+49FH 

BEA1 

BCPTHCD2  EQU  0SRM+9AIH 

BEA3 

BCPTHCD3  EQU  0SRAH+W3H 

BEA5 

BCPTMV1 

EQU  0SRAH+QA5H 

BEA7 

BCPTMV2 

EQU  OSRAH+M7H 

BEA9 

BCPTHV3 

EQU  0SRAN+$A9H 

BEAB 

BCPTTF1 

EQU  OSftAN+BABH 

BEAD 

BCPTMF2 

EQU  OSRAH+0ADH 

BEtf 

BCPTHF3 

EQU  OSRAH+WFH 

BEB1 

BCPTHLI 

ECU  0SRAH+4B1H 

BEB3 

BCPTHL2 

EQU  0SRAN+4B3H 

BEBS 

BCPTHL3 

EQU  QSRAH+4B5H 

{COPY  CF  CONTROL  REGISTER  BYTE  FOR  ACIAT 
{COPY  CF  CONTROL  REGISTER  BYTE  FOR  ACIAX 
{COPY  OF  CONTROL  REGISTER  BYTE  FOR  ACIAL 


{COPY  CF  CONTROL  REGISTER  BYTE  FOR  PTHAB1 
{COPY  CF  CONTROL  REGISTER  BYTE  FOR  PTHAB2 
{COPY  CF  CONTROL  REGISTER  BYTE  FOR  PTMAB3 
{COPY  CF  CONTRa  REGISTER  BYTE  FOR  PTMCD1 
{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTHCD2 
{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTHCD3 
{COPY  CF  CONTROL  REGISTER  BYTE  FOR  PTHV1 
{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTHV2 
{COPY  CF  CONTROL  REGISTER  BYTE  FOR  PTHV3 
{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PWi 
{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTHF2 
{COPY  OF  CONTRa  REGISTER  BYTE  FOR  PTHF3 
{COPY  OF  CONTRa  REGISTER  BYTE  FOR  PTML1 
{COPY  OF  CONTROL  REGISTER  BYTE  FOR  PTHL2 
{COPY  OF  CONTRa  REGISTER  BYTE  FOR  PTHL3 
{COPY  OF  CONTRa  REGISTER  BYTE  FOR  PTHR1 
{COPY  CF  CONTRa  REGISTER  BYTE  FOR  PTHR2 
{COPY  CF  CONTRa  REGISTER  BYTE  FOR  PTHR3 


{COPY  CF  CONTRa  REGISTER  BYTE  FOR  PIAA 
{COPY  CF  CONTRa  REGISTER  BYTE  FOR  PIAB 
{COPY  CF  CONTRa  REGISTER  BYTE  FOR  PIAC 
{COPY  CF  CONTRa  REGISTER  BYTE  FOR  PIAD 


BINARY  COUNT  PRELOAD  FOR  PTMAB1 
BINARY  CaNT  PRELOAD  FOR  PTMAB2 
BINARY  COUNT  PRELOAD  FOR  PTHAB3 
BINARY  COUNT  PRELOAD  FOR  PTHCD1 
BINARY  COUNT  PRELOAD  FOR  PTMCD2 
BINT  aunt  PRELOAD  FOR  PTHCD3 
BINAK.  NT  PRELOAD  FOR  PTHVl 
BINARY  COUNT  PRELOAD  FOR  PTW2 
BINARY  COUNT  PRELOAD  FOR  PTHV3 
BINARY  COLNT  PRELOAD  FOR  PTHF1 
BINARY  COUNT  PRELOAD  FOR  PTMF2 
BINARY  COLRTT  PRELOAD  FOR  PTNF3 
BINARY  COUNT  PRELOAD  FOR  PTrt.1 
BINARY  COUNT  PRELOAD  FOR  PTIL2 
{BINARY  COUNT  PRELOAD  FOR  PTML3 


i 

: 

BEU7 

BCPTHRI  EQU0SRAH+4B7H 

{BINARY  COUNT  PRELOAD  FOR  PTHR1 

k  w 

6CB9 

BCPTffi2  EOU  0SRAHKIB9H 

{BINARY  COUNT  PRELOAD  FOR  PTHR2 

N 

6EB8 

8CPTMT3  ECU  OSfWHBBH 

1 

{BINARY  COUNT  PRELOAD  FOR  PTHR3 

KBD 

• 

SOMSUt  ECU  0SRAM+4BDH 

{SONAR  SELECT  BYTE  WRITTEN  TO  PIA  A 

BEBD 

SSLA  ECU  SONARSLA 

■  - 

BCGC 

SONARSLB  ECU  OSRAH+4BEH 

{SONAR  SELECT  BYTE  WRITTEN  TO  PIA  B 

1 

BEK 

SSLB  ECU  SONARSLB 

BEK 

SONARSLC  ECU  0SRAH+4BFH 

{SONAR  SELECT  BYTE  WRITTEN  TO  PIA  C 

BEK 

SSLC  EQU  SONARSLC 

KCI 

SONARSID  ECU  OSRAN+DCDH 

{SONAR  SELECT  BYTE  WRITTEN  TO  PIA  D 

ft 

KCI 

SSLB  ECU  SONARSLB 

J 

i 

► 

KCI 

J 

SONARA  EQU  OSRAfHBCIH 

{LAST  SOW*  A  READING 

BEC2 

SONARS  EQU  0SRAM+4C2H 

{LAST  SONAR  B  READING 

KC3 

SONARC  ECU  0SRAN+DC3H 

{LAST  SONAR  C  READING 

►.  ■ 

BEC4 

SONARS  EQU  0SRAM+4C4H 

1 

{LAST  SONAR  D  READING 

B 

1 

KC5 

• 

SONTIME  EQU  0SRWH4C5H 

;TIC  TINE  OF  LAST  SONAR  READING 

■*,  4 

KC7 

MORETIC  EQU  0SRAH+8C7H 

J 

TIKZERO  EQU  OSRHHCAH 

J 

jJUTP  VECTOR  FOR  EXTENDED  TIC  INTERUPT  ROUTINE 

KCA 

{TINE  ZERO  FROM  DRIVE  COMPUTER  (13  BCD  LS  NIBBLES) 

H 

BED? 

TICTIME  EQU  OSRAfHWWH 
; 

IOOFFSET  EQU  OSRAN+BDBH 

1 

POUEPUP  EQU  OSRAH+QDCH 

1 

RAMSIZEL  EQU  OSRAIWDOH 

{ONE  TENTH  SECOND  TIC  TINE  COUNT  SINCE  TINE  ZERO 

►  * 

BEDB 

{OFFSET  INTO  I/O  AREA  FOR  PORT  INITIALIZATION 

■  *  * 

B 

BEDC 

{SET  TO  W  IF  POWER  UP  NOT  COMPLETE  ELSE  455 

./ , 

BEOD 

{LOWER  UNIT  OF  RAN  IN  SYSTEH 

j 

» 

BEK 

RAHSIZEH  EQU  OSRAIWDFH 

I 

SONCHANGE  EQU  OSRAN+K1H 

{HIGH  LIHIT  OF  RAH  IN  SYSTEH 

^  i 

BEE1 

{CHANGE  SELECTED  SONARS  IF  M  &SE  INTERRUPT 

BEE2 

SONNEXA  EQU  OSRAM+DE2H 

{HANDLER  SETS  THIS  BYTE  TO  B55H 
{NEXT  SONAR  SELECT  BYTE  WRITTEN  TO  PIA  A 

.  | 

BEE2 

NSSLA  EQU  SONNEXA 

BEE3 

SOTICXB  EQU  OSRAH+DE3H 

{NEXT  SONAR  SELECT  BYTE  WRITTEN  TO  PIA  B 

BEE3 

NSSLB  EQU  SONNEXB 

^  • 

KE4 

SONNEXC  EQU  GSRAH+DE4H 

{NEXT  SONAR  SELECT  BYTE  WRITTEN  TO  PIA  C 

BEE4 

NSSLC  EQU  SONEXC 

BEE3 

SONNEXB  EQU  0SRAM+8E5H 

{NEXT  SONAR  SELECT  BYTE  WRITTEN  TO  PIA  D 

!„*  i 
;• 

BEES 

NSSLD  EQU  SONNEXB 

BEE6 

TICTEHP4  EQU  OSRAH+OE6H 

{TEMPORARY  REGISTER  FOR  TIC  INTERRUPT 

*•_ ! 

KE8 

TICTEMP1  EQU  OSRAH+DE8H 

{TEMPORARY  REGISTER  FOR  TIC  INTERRUPT 

* 

BEEA 

TICTEMP2  EQU  OSRAM+0EAH 

{TEMPORARY  REGISTER  FOR  TIC  INTERRUPT 

1 

BEEC 

TICTEMP3  EQU  OSRAH+DECH 

1 

{TEMPORARY  REGISTER  FOR  TIC  INTERRUPT 

»’• 

.  _  1 

D-5 

■;  v  v  v*V  n*V* 

•V'-.V  ^**m**mJ^  •  ** «  ** .  ** .  •“  ]  ,  •*.  «*  • 

Vv*/  */*,'  "*  •%/.,**■./ .  V  •*.  •*.  •*.  **.  *% 

6E3E 

IMTHASK  EQU  OSRAM+6EEH 

BEEF 

; 

SOMMTSA  EQU  OSRAM+MFH 

BEF# 

SONDATRA  EQU  OSfW1^»F0H 

6EFI 

SONDATSB  EQU  OSRAM+QF1H 

BEF2 

SONDATRB  EQU  OSRAfWF2H 

BEF3 

SONDATSC  EQU  0SRAM+4F3H 

BEF4 

SONDATRC  EQU  0SRAH+4F4H 

8EF5 

SONDATSD  EQU  OSRAM*F5H 

BEF6 

SONDATRD  EQU  0SRAM+4F6H 

; INTERRUPTS  MASKED  IF  IFF  ELSE  NOT  MASKED 

;if  m 

{SONtt  SELECT  BYTE  FROM  READSONAR  R(WtI« 
{SONAR  READING  FROM  READSONAR  ROUTINE 
{SONAR  SELECT  BYTE  FROM  READSONAR  ROUTINE 
{SONAR  READING  FROM  READSONAR  ROUTINE 
{SONAR  SELECT  BYTE  FROM  READSONAR  ROUTINE 
{SONAR  READING  FROM  READSONAR  ROUTINE 
{SONAR  SELECT  BYTE  FROM  READSONAR  ROUTINE 
{SON*  READING  FROM  READSONAR  ROUTUC 


I 


BEF7 

OSEREO 

EQU 

0SRAM+QF7H  {BEGIN  ADDRESS  OF  WHEEL  COUNTS 

BEF7 

FWCOUNT 

EQU 

OSEREG 

{FRONT  WHEEL  ABSOLUTE  COUNT 

BEF9 

RWCOUNT1 

EQU 

OSEREG+2 

{RIGHT  MR  PTM  COUNTER  1  COUNTS 

BEFD 

RWCOUNT2 

EQU 

OSERE5+4 

{RIGHT  WHEEL  PTM  COUNTER  2  COUNTS 

BEFD 

LWCOUNTi 

EQU 

OSEREG+& 

{LEFT  MR  PTM  COUNTER  1  COUNTS 

BEFF 

LWCOUNT2 

1 

1 

I 

OSEMOO 

I 

I 

I 

RUHOD1 

EQU 

OSEREG+8 

{LEFT  WHEEL  PTH  COUNTER  2  COUNTS 

EFI1 

EQU 

OSEREG* H 

>  {MODULO  OF  MR  COUNTS  <  1° 

flFQl 

EQU 

OSEMOO 

{RIGHT  WHEEL  PTM  1  MODULO  COUNT 

BFI2 

RNM0D2 

EQU 

OSEMOD+1 

{RIGHT  WHEEL  PTM  2  MODULO  COUNT 

BFM 

LMTIODl 

EQU 

0SEM0D+2 

{LEFT  WHEEL  PTM  1  MODULO  COUNT 

BFM 

UH002 

I 

EQU 

OSEMOO+3 

{LEFT  WHEEL  PTH  2  MODULO  COUNT 

BFM 

I 

COLD 

EQU 

OSRM+#!tiH 

{JUMP  VECTOR  FOR  C  (COLD  START)  COUWB) 

BFM 

WARM 

EQU 

OSRAH+G1MH 

{JUMP  VECTOR  FOR  W  (WARM  START)  COMMAND 

BFM 

OOESSEY 

EQU 

OSRAM+Q10BH 

{JUMP  VECTOR  FOR  0  (ODESSEY)  COttttND 

!  EXPANSION  AREA  FOR  EQUATES 


I 

I 

I 


BF7C 

LKSONTMP  EQU  0SRAH+Q17CH 

BF7E 

LSXTEMP 

EQU  0SRAM+D17EH 

BFM 

BUF 

EQU  0SRAM+4180H 

BFC7 

BUFEND 

EQU  0SRAM+B1C7H 

BFC8 

OFFSET 

EQU  OS8W41C8H 

BFCA 

ADR 

EQU  OSRAM1CAH 

BFCC 

ADOL 

EQU  0SRAM+41CCH 

BFCE 

ADDH 

EQU  OfRAM+QlCEH 

BFM 

BUFPTR 

EQU  OSRAM+B1DQH 

BFD2 

RECTYP 

EQU  OSRAN+QID2H 

{TEMPORARY  REGISTER  FOR  SONAR  PRINT  ROUTINE 
{TEMPORARY  REGISTER  FOR  $£WW  PRINT  ROUTINE 
{LINE  BUFFER  START 
{END  LINE  BUFFER 


BFD3 

COUNT 

EQU  0SRAH+*ID3H 

BFD4 

CKSUN 

ECU  0SRAM+D1D4H 

BFD5 

TDT* 

EQU  0SRAN+*ID5H 

{TEMPORARY  REGISTERS  HAYNOT  BE  USED 

BFD7 

TEMPI 

EQU  0Sim*lD7H 

;BY  ROUTINES  THAT  ARE  ASSOCIATED  WITH 

BFD9 

TDP2 

ECU  0SRAM+I1D9H 

{INTERRUPTS 

BFDS 

TEMP3 

EQU  Q$RAH**1DBH 

BFDD 

TEMP4 

EQU  OSRAM+eiDCH 

BFDF 

TEMPS 

EQU  0SRAH+Q1DFH 

BFE1 

TDP6 

EQU  0SRMH41E1H 

BFE3 

TEMP? 

EQU  0SRAN+*1E3H 

bfe 

MYFIAG* 

EQU  0SRAM+*1E5H 

;TBD 

BFE6 

MYFLAG1 

EQU  0SRAM+41E6H 

jTBD 

BFE7 

SYSFIAO 

ECU  0SRAM+Q1E7H 

{TDD 

BFE8 

ECHO 

ECU  QSRAM+41E8H 

BFE9 

TCOUNT 

EQU  0SRAM+Q1ESH 

BFEA 

CREG 

EQU  0SRAMM1EAH 

GFEB 

DREG 

EQU  OSRWMIEBK 

BFEC 

AREC 

EQU  0SRAMM1ECH 

BFED 

XREO 

ECU  0SRAM+Q1EDH 

BPEF 

PREG 

EQU  OSRAM+Q1EFH 

BFF1 

SREG 

ECU  0SRAK+*1F1H 

BFF3 

USUI 

EQU  OSWmiF3H 

BFF3 

ACIAI 

EQU  OSRAfH*lF3H 

BFF7 

IPQVEC 

EQU  0SRAM**1F7H 

BFFA 

SUIVEC 

ECU  OSRAIMIFM 

BFFD 

WIVEC 

EQU  0SRAN+41FDH 

AM* 

HIOV 

EQU  *AM*H 

AM2 

HBEGA 

EQU  *AM2H 

AM4 

ICNDA 

EQUMM4H 

AM5 

HENDA1 

EQU  *AM3H 

MAi 

nVfO 

MNIO 

EQU  *A*MH 

AAAfl 

HfW 

MSP 

CQUtAMGH 

AMA 

NCXSM 

equ  mm 

AAAA 

RWv 

HBYTECT 

EQUeAMDH 

MXHI 

EQU  0AMC1I 

AMD 

HXLOU 

EQU  0AMOH 

AME 

HTEMP 

EQU  MMEH 

AMF 

MTU 

EQU  *AMFH 

Ml* 

HTK1 

EQU  0M1*H 

MU 

fTCUNT 

EQU  0MUH 

M12 

MXTEMP 

EQU  «M12H 

M42 

MSTACX 

EQU  9A942H  . 

AAAA 

vvvV 

MACIA 

EQU  ACIAT 

BFF3 

MACIAI 

I 

ECU  ACIAI 

j  THIS  AREA  FOR  SPECIAL  SYMBXIC  EQUATES 

MM  XZERO  EQU  M*1H  {LOADS  ZERO  INTO  INDEX  REGISTER 

I 

MM  END 

No  orrorls). 
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SYMBOL  TABLE  FOR  FILE  HAVCEF.A 


A.C 

MM 

A.L 

Ml* 

A.RX 

•Ml 

A.S 

MM 

A.T 

MM 

A.TX 

*M1 

A.X 

*M8 

A* 

•Ml 

A1 

mi 

A2 

M*4 

A3 

*M8 

A4 

•Cl* 

A5 

M2* 

A6 

M4* 

A7 

MS* 

AC1ACS 

MM 

ACIAI 

BFF5 

AC1AL 

Ml* 

ACIttX 

•Ml 

ACIASTAT 

MM 

ACIAT 

TSrtrO 

ACIATX 

•Ml 

ACIAI 

M*8 

ADDH 

BFCE 

ADOL 

BFCC 

ADR 

BFCA 

AREG 

BFEC 

B* 

•Ml 

B1 

M*2 

02 

MM 

B3 

atj\o 

▼Wo 

B4 

Ml* 

B5 

M2* 

06 

MM 

B7 

MM 

BCPTMAB1 

BE99 

BCPTMAB2 

BE9B 

BCPTMAB3 

BE9D 

BCPTMCD1 

BE9F 

BCPTHC02 

BEA1 

BCPTMC03 

BEA3 

BCPTWF1 

BEAB 

BCPTMF2 

BEAD 

BCPT7F3 

BEAF 

BCPTML1 

BEB1 

BCPTtt2 

BEB3 

BCPTR.3 

BEDS 

BCPTMR1 

BEB7 

BCPTJR2 

BEB9 

BCPTMR3 

BEB8 

BCPTW1 

BEAS 

BCPTHV2 

BEA7 

BCPTHV3 

BEA? 

BOS 

BE7F 

BREG 

BFEO 

BUF 

BF8* 

BUFEXD 

BFC7 

BUFPTR 

BFD* 

C* 

•Ml 

Cl 

•M2 

C2 

•M4 

C3 

•mo 

C4 

Ml* 

C5 

M2* 

C& 

MM 

C7 

**e* 

CKSUN 

8FD4 

COLO 

BF*9 

COUNT 

BFD3 

CfiACIfi 

BE82 

CRACIAT 

BE8* 

CRACIAX 

BE81 

CRED 

BFEA 

CSPIAA 

BE95 

CRP1AB 

BE96 

CSP1AC 

BE97 

CSPIAO 

BE98 

CRPTMAB1 

BE83 

CRPTMAB2 

BE84 

CRPTMA83 

BE85 

CRPTMCD1 

BE86 

CRPTNCD2 

BE87 

CRPT1CD3 

BE88 

CRPTMF1 

BE8C 

CRPT?f2 

KBO 

CRPTJF3 

BE8E 

CRPTHl 

BE8F 

CRPTM2 

BEM 

CRPTML3 

BE?I 

CRPT7R1 

BES2 

CRPTIR2 

BE93 

CRPTJfO 

BE94 

CRPTHV1 

3E89 

CRPTHV2 

BE8A 

CRPTMV3 

BE8B 

0* 

•Ml 

01 

M*2 

02 

*M4 

03 

M*8 

04 

Ml* 

09 

M2* 

06 

MM 

07 

aaaa 

Wof 

ECHO 

BFEB 

FHCOUNT 

BEF7 

INTHASK 

BEEE 

10 

CM* 

I0GFFSET 

BEDS 

IRQVEC 

BFF7 

UCSONTHP 

EF7C 

LSITEMP 

BF7E 

LUC0UNT1 

BEFD 

LWC0UKT2 

BEFF 

LWH0D1 

BF*3 

LHN0D2 

BFM 

HACIA 

*M* 

HACIAI 

BFF5 

HBEGA 

AM2 

HBYTECT 

AMB 

HCXSH 

AMA 

ICNDA 

AM4 

PCNDA1 

AM5 

mov 

AAAA 

(ww 

N1C0NT 

A*U 

mio 

m> 

nORETIC 

BEC7 

KSP 

AM8 

MSTACX 

A*42 

MTEN» 

AME 

HTW 

AMF 

HTW1 

A«l* 

HIHI 

AMC 

HXLOU 

AMD 

HXTEMP 

A*12 

HYFLAG* 

BFE5 

HYFLAG1 

BFE6 

M1IVEC 

BFFD 

NSSLA 

BEE2 

NSSLB 

BEE3 

NSSLC 

BEE4 

NSSLO 

BEE9 

ODESSEY 

BF*B 

OFFSET 

BFC8 

OSEMOD 

BF*1 

OSEREG 

BEF7 

OSRAH 

BEM 

P.AB 

*M8 

P.CO 

M5* 

P.CRA 

•Ml 

P.CRB 

•M3 

P.CRC 

•Ml 

P.CRD 

•M3 

P.DDA 

aaaa 

Wvf 

P.DDB 

•M2 

P.DDC 

AAAA 

wVW 

P.DDO 

•M2 

P.PRA 

AAAA 

vwv 

P.PRB 

•M2 

P.PRC 

aAAA 

VVPV 

P.PRD 

•M2 

P.SRA 

•Ml 

P.SRB 

•M3 

P.SRC 

•Ml 

P.SRD 

•M3 

P1AAB 

M48 

PIACD 

MM 

P1ACRA 

M*1 

P1ACRB 

•M3 

PIACRC 

•Ml 

P1ACRD 

•M3 

PI ADDA 

AAAA 

WW 

PIADDB 

•M2 

PIADDC 

MM 

PIADDC 

•M2 

PIAPA 

AAAA 

PIAPB 

•M2 

PIAPC 

MM 

PItfD 

•M2 

PIASTATA 

•Ml 

PIASTATB 

•M3 

PIASTATC 

•Ml 

PIASTATO 

•M3 

POWERUP 

BEDC 

PREG 

BFEF 

PTMAB 

M18 

PTWCD 

M2* 

PTMCR1 

AAAA 

fvW 

PTHCR2 

•Ml 

PTMCR3 

aaaa 

vvvv 

PTJf 

M3* 

PTH 

M38 

PTffi 

M4* 

PTMSTAT 

•Ml 

PTHV 

M28 

RAKSIZEll 

BEDF 

RAHSIZa 

BEDD 

D-e 


RECTYP  BFB2 

anm  m2 

SC.4ARD  BEC4 
SONARSLD  EEC* 
SONOATRC  BEF4 
SOWATSC  BEF3 
SOMEXC  BEE4 
SSLA  BEBO 
SWIVEC  BFFA 
T.C2  M41 
T.CNT2  4M4 
T.LATCH1  m2 
T.S  m\ 
TEMPI  BFD7 
TEHP5  BFT3F 
TICTEHP1  BEF8 
TIIGERO  BECA 

L'wn  eree 


RWCOUNTi  BEF? 
so»m  KCi 
SONAR  SLA  EEBD 
SONCHANG  BEE1 
SONOATRO  BEF6 
SONDATSD  BEF3 
SOftEXD  BEES 
SSLB  BEBE 
SYSaAG  BFE7 
T.C3  MM 
T.CNT3  MM 
T.LATCH2  MM 
T.V  4428 
TENP2  BFD9 
TEMPS  BFE1 
T1CTEMP2  BEEA 
TUSRAM  BCM 
XREG  BFED 


RUC0UNT2  BEFB 
SONARB  BEC2 
SONARSLB  BEBE 
SOHDATRA  BEFB 
S04*DATSA  BEEF 
SOttGA  BEE2 
SONTIME  BECS 
SSLC  BEBF 
T.AB  M18 
T.CD  M24 
T.F  M34 
T.LATCH3  MM 
TCOUNT  BFE? 
TDP3  BFD8 
TEMP?  BFE3 
T1CTEMP3  BEEC 
USRSTM  GEM 
XZERO  MM 


R4H001 

6F4I 

SONARC 

BEC3 

SONARSIC 

BEBF 

SONDATRB 

BEF2 

SONTATSB 

BEFI 

SOfNEXB 

BEE3 

SREG 

BFF1 

SSLD 

BECI 

T.Ct 

MM 

T.CNT1 

M02 

T.L 

M38 

T.R 

M44 

TEMPI 

BF05 

TOP4 

BFDD 

TICTEH* 

BEES 

TICTIIC 

BED? 

USUI 

BFF3 

;*  * 

}*  APPENDIX  E  » 

5*  * 

;  FILE:  DRIVEDEF.A 

I 

;  r^RS-1  DRIVE  COWJTER  EFINITIQNS 

• 

I  THE  DRIVE  COMPUTER  USES  THE  VIRTUAL  DEVICES 

• 

!  MENOS  UPGRADE  FOR  THE  HEATH  FCRO  COMPUTER.  AS  SUCH, 

I 

j  THE  CPU  IS  A  MOTOROLA  6801  AND  SYSTEM  RAM  USAGE  IS 
• 

!  SLIGHTLY  DIFFERENT  FROM  TPE  STANDARD  HERO  COMPUTER. 

• 

|  THE  BAUD  RATE  FOR  THE  6801  SERIAL  OMNICATION  INTERFACE 

; 

;  IS  300  BAUD  WHEN  POWERING  UP  IN  LILBUG  NODE  AND  9600 
I 

;  BAUD  UKEN  IN  MENOS  MODE.  THE  ORIGINAL  BAUD  RATE 
I 

;  FOR  MENOS  WAS  300.  THE  9600  BAUD  RATE  WAS  OBTAINED  BY 
* 

1  BURNING  A  NEW  ROM  (U301)  FOR  THE  MENOS  UPGRADE  BOARD 

;  AND  CHANGING  THE  FOLLOWING  ROM  LOCATIONS 
l 

j  0FEE9H  0FF06H  0FF91H 

;  WITH  A  NEW  BAUD  RATE  DIVISOR  BYTE: 
l 

j  05  FOR  9600  BAUD 

I 

j  06  FOR  1200  BAUD 

I 

j  07  FOR  300  BAUD 

I 

\ 

ORG  OOOOH 

;RAM  ALLOCATIONS  FOR  MODIFIED  HERO  (0000-03FF) 

I 

■ 

» 

{Version  1. 1C. 

{Written  by  A.  H.  Ballard  10/22/33 
{Version  2. 

{Written  b^  A.  H.  Ballard  1/14/84 

• 

* 

1 
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{  The  original  HERO  ROM  Monitor  (version  1.0)  side  use 
;of  the  first  63  bytes  of  the  4K  RAM  for  status  data  and 
; junp  vectors,  and  the  top  287  bytes  of  RAM  for  stacks 
;and  scratchpad  areas.  The  central  3746  bytes  (003P  to 
;0EE0)  were  left  available  for  user  proyrans.  Version 
; 1. 1  of  the  HERO  ROM  used  another  2  bytes  in  high  RAM. 
;The  aodified  ROM  produced  by  Virtual  Devices  reserves 
{the  first  32  bytes  in  ROM  for  use  as  control  and  status 
{registers  for  a  new  6801  aicroprocessor.  The  original 
{63  bytes  in  RAM  were  loved  up  by  32  bytes  (20  Hex  added 
;to  all  addresses).  In  addition,  the  Virtual  Devices 
;Modif ication  (Version  10)  uses  2  bytes  in  high  RAM  as  a 
{buffer  for  serial  coMunications. 

1 

;  laaediately  after  a  cold  start  or  a  vara  restart, 
{certain  of  these  RAM  locations  are  initialized  to 
{default  values.  See  the  file  MHINI1.A  for  details 
;of  RAM  initialization  in  the  HERO  robot,  as  aodified  bg 
{Virtual  Devices. 

I 

5 

1 

{Current  overall  allocation  of  RAMi 
1 

;  Low  RAM  used  by  Mod  HERO  95  bytes  (0000-005E) 

;  User  aeaory  available  3710  bytes  (005F-0EDC) 

{  High  RAM  used  by  Mod  HERO  291  bytes  (0EDO-03FF) 

• 

I 

{Reserved  bytes  in  low  RAM: 

1 

1 

;6801  control  and  status  registers: 

1 

DDR1  RMB  1  {Port  1  data  direction  register 
1 

{  0  =  input 
;  1  =  output 

1 

DDR2  RMB  1  {Port  2  data  direction  register 
5 

5  0  =  input 
;  1  =  output 

1 

• 

DR1  RMB  1  {Port  1  data  register 
1 

;  Bits  7,6  =  select  aeaory  aap 

• 

» 

{  00  =  (not  used) 

5  01  =  SYSROM  46000,  SYSRAK  4E000 

;  10  =  SYSRAM  46000,  HROH  4EO00 

{  11  *  SYSRAM  46000,  SYSROM  4E000 


I 

5  Bit  5  ■  green  LED  (•/!  «  OFF/ON) 
;  Bit  4  >  select  Maori  tank  0/1 
1  Bit  3  ■  radio  (0/1  =  RCV/XHT) 
j  Bit  2  ■  tiwr  3  output 
;  Bit  1  *  tieer  2  output 
;  Bit  0  *  tiaer  2  input 

1 


0003 

DR2 

RKB  1  ;Port  2  data  register 

J 

5 

]  Bits  7,6,5  ■  6801  aode  (R/0) 

;  Bit  4  *  serial  com  output 

;  Bit  3  *  serial  com  input 

1  Bit  2  3  clock  for  serial  com 
;  Bit  l  «  tieer  1  output 

;  Bit  0  ■  tieer  1  input 

0004 

• 

i 

• 

* 

5 

DDR3 

ORG  (0004 

AAAI 

vftn 

RKB  1  ;Port  3  data  direction  register  (not  used) 

0004 

DR2CPY 

1 

1 

1 

; 

i 

i 

EQU  (04  5  COPY  OF  Port  2  date  register 

111!!  CRITICAL  ADDRESS!!!!!!!!!!!! 

0005 

ORG  (0005 

0005 

i 

DDR4 

• 

RKB  1  ;Port  4  data  direction  register 

1 

;  Set  l's  for  address  output 

0006 

» 

\ 

ORG  (0006 

0006 

DR3 

RKB  1  {Port  3  data  register  (not  used) 

0006 

DDRiCPY  EQU  006  ;  COPY  OF  Port  1  data  direction  register 

• 

» 

1 

0007 

1 

• 

1 

ORG  (0007 

0007 

DR4 

RKB  1  ;Port  4  data  register  (not  used) 

1 


i 

1 

*M  ORG  toooe 

• 

0008  TCSR  RUB  1  ;Ti»er  t  control  and  status  register 

1 

;  Bit  7  *  ICF,  input  capture  flag  (R/O) 

;  Bit  6  3  OCF,  output  conpare  flag  (R/O) 

;  Bit  5  3  TCF,  tioer  overflow  flag  (R/O) 

;  Bit  4  3  EICI,  enable  input  capture  interrupts 

;  Bit  3  3  EOCI,  enable  output  coapare  interrupts 

;  Bit  2  3  ETOI,  enable  tiaer  overflow  interrupts 

;  Bit  1  3  IEDG,  input  edge  polarity  (0=HL,  1<H) 

;  Bit  0  3  OLVL,  output  level  select  (0=L,  1*H) 


i 


0009 

CNTR 

1 

RHB  2 

5 16-bit  CPU  counter  register  (R/O) 

ooob 

1 

GCR1 

1 

RUB  5 

; 16-bit  output  cotpare  register  1 

009D 

1 

ICR1 

RHB  2 

5 16-bit  input  capture  register  1  (R/O) 

1 

1 

1 


009F 

1 

CR3 

ORG  4000F 

OOOF 

RHB  1  {Port  3  control  register  (not  used) 

OOOF 

DR1CPY 

1 

ECU  40F  5  CCPY  OF  Port  1  data  register 

0010 

1 

1 

DMTO 

KTW\ 

ORG  40010 

0010 

RHB  1  ;$CI  rate  and  lode  control  register 

1 

;  Bits  7-4  3  (not  used) 

1 

S  Bits  3,2  3  foraat  and  clock  control 
5 

;  OB  3  Bi-phase,  internal  clock,  P22  not  used 

;  01  3  NRZ,  internal  clock,  P22  not  used 

;  10  3  NRZ,  internal  clock,  P22  is  clock  output 

;  11  3  NRZ,  external  clock,  P22  is  clock  input 

I 

;  Bits  1,0  3  baud  rate  select 

a 

5  00  3  76800  bps 

;  01  3  9600  bps 

;  10  3  1200  bps 

;  11  3  300  bps 
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Mil  TRCS  RUB  1  ;SCI  transait/receive  control/status 

I 

;  Bit  7  *  RDRF,  receive  data  register  full  flag  (R/O) 

;  Bit  4  *  ORFE,  overrun/fraaing  error  flag  (R/O) 
j  Bit  5  *  TORE,  transmit  data  register  (apt)  flag  (R/O) 
;  Bit  4  «  R!£,  receiver  interrupt  enalbe 
;  Bit  3  *  RE,  receiver  enable 
5  Bit  2  8  TIE,  tramaitter  interrupt  enable 
;  Bit  1  «  TE,  transmitter  enable 
;  Bit  0  «  HU,  enable  aake-up  on  next  aessage 
I 


0012 

RDR 

1 

RM8  1 

;SCI  receive  data  register 

0013 

; 

TOR 

1 

RMB  1 

(SCI  transait  data  register 

0014 

1 

RAMC 

RKB  1 

(RAH  control  register 

I 

;  Bit  7  *  STBY,  let  to  aonitor  voltage  (0/l=LO/HI) 

;  Bit  6  *  RAME,  0/l*enable/disable  on-chip  RAH  (I80FF) 

;  Bits  5-0  a  (not  used) 
i 
I 
1 
1 

0815  ORO  40013 

I 

(Additional  registers  for  4801U4  version} 

a 

•  THE  FOLLOWING  ARE  NOT  IMPLEMENTED  IN  THE  BASIC  6801  OR  4301 
;  THESE  ARE  BEING  RESERVED  FOR  THE  POTENTIAL  USE  OF  THE  6801U4 
1 


0013 

ACNT 

RKB  2 

(Alternate  counter  address 

0017 

TCR1 

RMB  1 

(Tiaer  control  register  1 

0018 

TCR2 

RMB  1 

(Tiaer  control  register  2 

0019 

T3R 

RMB  1 

(Tiaer  status  register 

001A 

0CR2 

RMB  2 

(Output  coapare  register  2 

001C 

0CR3 

RMB  2 

(Output  coapare  register  3 

001E 

ICR2 

RMB  2 

(Input  capture  register  2 

0020 

1 


ORG  I002v 


$£$$ 


M24 

4424 

1421 

4422 

4423 
•424 

4425 
mb 
mi 

4429 


N2B 


;HER4  it«tus  data! 


1 

ipos  FQU  * 
EXTPOS  RMB  1 
SHLFOS  RMB  1 
ROTPOS  m  l 
PVTPOS  RMB  l 
GRPPOS  RMB  l 
HEDPOS  RMB  1 
STRPOS  RMB  i 
DRVPOS  RMB  2 
DRVODM  RMB  2 
1 
? 

ACTSTAT  RMB  1 


{Current  position  of  an  extend  iotor 
{Current  position  of  shoulder  iotor 
{Current  position  of  wrist  rotate  »otor 
{Current  position  of  wrist  pivot  iotor 
{Current  position  of  gripper  iotor 
{Current  position  of  head  iotor 
{Current  position  of  steering  iotor 
{Spoke  count  for  base  iotor  coMMnd 
{Odoieter  spoke  count  for  base  iotor 


{Activitg  status  byte 
) 

{  Bits  7-5  =  (not  used) 

{  Bit  4  *  base  speed  raiping 
;  Bit  3  *  speech  active 
]  Bit  2  »  an/head  lotors  active 
]  Bit  1  >  steering  iotor  active 
]  Bit  •  »  base  iotor  active 


M7C 


ABTSTAT  RMB  1 


Abort  request  status  byte 


;  Bits  7-4  »  (not  used) 

;  Bit  3  »  abort  speech 
;  Bit  2  s  abort  an/head  lotors 
;  Bit  1  b  Abort  steering  iotor 
;  Bit  I  »  ibort  base  iotor 

1 


120 

SLEEPER 

RMB  2 

{Sleep  count,  14  sec  steps 

*2F 

HUNGRY 

RMB  l 

{Low  (logic)  battery  indicator  bgte 

34 

SNRHIT 

RMB  1 

{Cun  count  for  detected  sonar  echoes 

131 

SNRRNG 

RMB  1 

{Host  recently  insured  sonar  range 

) 

1 

J 

? 

4432  ORG  44432 


1 

{User-supplied  juip  vectors! 

;  Default  (R)  =  RTS;  (SR)  =  SEC, RTS;  (-)  =  none 


I 


4432 

USRCYCLE  RMB  3 

Customize  start  of  interp  cycle 

(R) 

4435 

USRINTRP  RMB  3 

Extend  interp  coiaand  list 

(SR) 

4438 

USRIRQ 

RMB  3 

Customize  IRQ  handler 

(R) 

443B 

USRCLOCK  RMB  3 

Customize  clock  IRQ  routine 

(R) 

443E 

USRSPD 

RMB  3 

Custonize  drive  speed  routine 

(R) 

4441 

USRLLB 

RMB  3 

New  IRC,  low  logic  battery 

(SR) 

E-6 


<3 


M44 

USRLDB 

RHB  3 

New  IRQ,  low  drive  battery 

(SR) 

mi 

USRHDT 

RHB  3 

User  progras  for  notion  detector 

(R) 

M4A 

USRTRG 

RHB  3 

User  prograa  for  pendant  trigger 

(R) 

M4D 

USREXP 

RHB  3 

User  IRQ  progras  for  exper  board 

(R) 

MM 

USER1 

RHB  3 

Junp  vector  for  Key  9  in  exec  node  (-) 

M53 

USER2 

RHB  3 

Junp  vector  for  Key  C  in  exec  node  (-) 

M56 

USER3 

RHB  3 

Junp  vector  for  Key  F  in  exec  node  (-1 

J 


1 

j  ORG  IM39 
J 

{Scratch  pad  registers! 


M5? 

T# 

RHB  2 

{Used  in  utility,  aanual, 

learn  nodes 

MSB 

T1 

RHB  2 

{Used  in  utility,  sanual, 

learn  nodes 

M50 

T2 

RHB  2 

{Used  in  utility,  sanual, 

learn  nodes 

I 

J 

J 

5 

M5F  ORG  IM5F 

5 
1 

{Ran  area  available  for  ustr  progress! 
1 

M5F  USRRAM  RHB  3711 


•EDO 


•EDO 
CCD E 

•EDF 


ORG 


MEDD 


{HIGH  RAH 


I 

{Reserved  bytes  in  high  RAMi 


{ 

{Used  only  by  Virtual  Devices  sodificationsi 


{RXSTAT  EQU  MEDD 
RXSTAT  RHB  1 
{RXBUFF  EQU  MEDE 
RXBUFF  m  1 


;FF  =  good  byte,  W  *  none/bad 
;M*no/bad  byte,  FF=good  byte 
{Holds  good  byte  received 
{Holds  good  byte  received 


I 

{Used  only  in  tCRO  l.i  and  later  versions! 


PHRTEMP  RHB  2  ; AAAA  is  put  here  when  re-initializing 

;to  hose  CPOS  registers  but  not  sotors 


t 

I 

{Used  in  executive/interpreter  nodes: 


J 


E-7 


MODE  RUB  1  ;W*ft4tiv*  aode,  FF«robot  «od« 

? 

PCSAVE  RUB  2  ;User  prograa  counter  stored  hero 

5 

S 

STRSTP  RUB  12  ; Buffer  arcs  for  ttoor  stepper  Motor 

ARMSTP  RUB  12  ;8uff*r  area  for  ara/head  steppers 

• 

;  Forest  for  STRSTP  and  MHSTP  buffers! 

I 

;  Bgto  •  *  STPHASK,  aatk  for  output  port 
5 

;  44F  «  low  nibble 

;  4F4  *  high  nibble 

• 

;  Bgto  1  «  STPSa,  scat#  factor 
1 

;  443  3  4  physical  ttopi  per  logical  stop 

;  447  *  8  physical  stops  por  logical  stop 

;  44F  3  lb  physical  stops  por  logical  stop 

;  41F  3  32  physical  stops  por  logical  stop 

I 

;  Bytos  2,3  3  STPPORT,  stopper  output  port 
5 

;  Bytos  4,5  3  STPPOS,  address  of  current  position 
I 

I  Byte  &  3  STPLIH,  liait  switch  task  for  port  4C244 
I 

;  424  for  shoulder  aotor 

;  412  for  head  aotor 

;  448  for  steering  aotor 

{  444  for  other  aotors 

I 

;  Byte  7  3  STPTIHE,  speed  divisor  (decreaented  to  4) 

a 

* 

•  Byte  8  3  STPTIHE4,  speed  divisor  (fixed) 

1 

;  Byte  9  3  STPSEQ,  step  pattern  sequence  select 

• 

;  444-43  for  forward  (start  at  444) 

;  444-47  for  reverse  (start  at  444) 

1 

;  Bytes  14,11  3  STPNO,  nuaber  of  physical  steps  to  go 
5 
5 
1 
? 

aCKTIHE  RUB  1  ;8-bit  count  for  1424  Hz  clock 

a 

DRVNO  RMB  2  ;Steps  to  go  (DPOS)  for  base  aotor 

a 

STRPCPY  RUB  1  ;Last  byte  sent  to  STRfWT=C264 


•F4C 

OLDDIS 

RMB  2  { 

•F4E 

DISLHDE 

RMB  1  { 

•F4F 

OLDLMDE 

RMB  1  { 

X1EMP 

RMB  2  { 

{Used  b| 
5 

STPPTR 

IRQ  handler  onlgi 

*52 

RMB  2  { 

•F54 

TEMPI 

RMB  2  { 

*36 

SPSAVE 

■ 

RMB  2  { 

» 

jUstd  in  txecutive  and  int«rpr«t#r  iodt: 

■ 

9F38 

USRSTK 

RMB  64 

User  stack  area 

*98 

NONSTK 

RMB  64 

Monitor  stack  area 

<FD6 

PNRSTK 

RMB  8 

Power-on  stack  area 

*E« 

BKTBL 

RMB  12 

Table  of  4  breakpoint  vectors 

<FEC 

BKPNTSTK  RMB  2 

Pointer  for  breakpoint  stack 

•FEE 

TE« 

RMB  2 

Teaporarg  register,  exec  node 

*F9 

TE1 

RMB  2 

Teaporarg  register,  exec  node 

*F2 

DIGADD 

RMB  2 

Address  of  next  LED  display  digit 

•FF4 

USERS 

RMB  2 

User's  stack  pointer 

•FF6 

SYSSUI 

RMB  3 

Software  interrupt  vector 

•FF? 

DSHPTR 

RMB  2 

Digit  address  for  aoving  dash  display 

*FB 

DSHDIR 

RMB  1 

Direction  of  aoving  dash  display 

•FFC 

TIME1 

RMB  2 

Display  tiae  for  "HERO  1.x* 

•FFE 

TIIE2 

RMB  2 

Displag  tiae  fvr  aoving  dash 

I 

{Used  in  executive  and  interpreter  aodesi 


I 

I 

;End  of  4K  RAN 
1 

I 

{  CONTROL  AND  STATUS  PORTS  -  -  MEMORY  fWPPED  PHYSICAL  ADDRESSES 


5 


C229 

SWTIffl 

EQU  4C220 

;SONAR  TIMER 

C249 

SENSE 

EQU  4C240 

{SENSE  INPUT 

C269 

LIMIT 

EQU  1C269 

{LIMIT  SWITCH  INPUT  BYTE 

cm 

TEACHING 

EQU  tem 

{TEACHING  FNDT  (REMOTE)  INPUT  BYTE 

C2M 

IRQ  PORT 

EQU  icm 

{IRQ  INTERRUPT  BYTE  INPUT 

C22» 

EXPOUT 

EQU  10229 

{EXP  OUT  ADDR  EXPERIMENTAL  BOARD  OUTPUT  BYTE 

cm 

EXP  IN  A 

EQU  1C2A9 

;EXP  IN  ADDR  EXPERIMENTAL  BOARD  INPUT  BYTE 

I 


{PORT  DEFINITIONS  FOR  ItRO  ROBOT  (iC900-D909) 
{Version  1.9,  1/16/84,  written  bg  A.  H.  Ballard 

{(6891  ports  are  defined  in  HERODEFl.a) 


;  Input  portu 

cai  equ  Km 

C0L2  EQU  Km 

ca.3  equ  tce% 

I 

SUPPORT  EQU  1022* 


LIMPORT  EQU  tC26# 


{Input  fro*  keypad  coluon  1 
{Input  fro*  keypad  coluon  2 
{Input  fro*  keypad  coluon  3 

{Sonar  range  data  (8  bits) 


SENSPORT  EQU  4C24I  ;Light/tound  intensity  (8  bits) 


;Lioit  switches  ♦  oiicellaneoui 


Bit  7  *  Cassette  tape  input 

Bit  6  »  Steering  ootor  full  CCW 

Bit  5  «  Shoulder  ootor  full  DOWN 

Bit  4  >  Head  *otor  full  CCU 

Bit  3  *  Steering  ootor  full  CU 

Bit  2  *  Shoulder  ootor  full  UP 

Bit  1  *  Head  ootor  full  CW 

Bit  I  *  Speech  board  ready  for  next  phone 


REPORT  EQU  4C288 


{Renote  teach  pendant,  sleep  so. 


;  Bit  7  *  Select  base  (!)  or  aro  (1)  notion 

I  * 

I  Bits  6,3,4  *  rotary  selector 
I 

;  If  base  selected:  m  «  stop  base  drive 
;  Ml  «  drive  forward,  slow 

{  111  «  drive  forward,  nediun 

{  til  *  drive  forward,  fast 

{  188  =  (not  used) 

{  111  =  drive  reverse,  slow 

{  ill  =  drive  reverse,  oediun 

{  111  »  drive  reverse,  fast 

* 

;  If  aro  selected:  III  «  (not  Used) 

{  111  s  select  wrist  pivot  ootor 

{  111  =  select  wrist  rotate  ootor 

{  111  =  select  gripper  ootor 

;  108  ■  (not  used  ) 

;  181  »  select  shoulder  ootor 

;  111  3  select  aro  extend  ootor 

{  lit  =  select  head  ootor 

t 

;  Bit  3  3  |  for  left/down/in/open  direction,  1  for  OFF 

o 

;  Bit  2  ■  I  for  right/up/out/close  direction,  1  for  OFF 

* 

I 

;Bit  1  3  Sleep  switch  (I  =  sleep,  1  3  noroal) 

t 

;  Bit  I  »  Pendant  trigger  (I  «  released,  1  »  active) 


•  -V-V«'SV 


{Experiment  board  input  port  (8  bits) 


C2A8 


cm 


C3H 


C16F 

C15F 

C14F 

C13F 

C12F 

CUF 


cm 


{ 

EXPIPORT  ECU  4C2A8 
1 

;  Input/output  ports* 

o 

IRCaPORT  ECU  IC288  {Interrupt  reouest  port 
i 

{  Input  *  rood  interrupt  flips 
{  Output  «  reset  interrupt  flips 
I 

{  Bit  7  «  experiment  boird  interrupt 
;  Bit  6  «  drive  uheel  spoke  sensor 
;  Bit  5  *  tripger  on  teicb  pendent 

;  Bit  4  «  1824  Hz  clock 

I  Bit  3  ■  lou  logic  better}  sensor 

{  Bit  2  *  lou  drive  betterp  sensor 

{  Bit  1  «  motion  detector 
{  Bit  8  *  soner  echo  detector 
I 

CtCXPORr  EQU  4C388  ;Set  or  reed  time/dite 
1 

{  Bits  7-4  «  Rode  select 
1 

5  8188  «  Write 

;  8181  «  Hold 

I  1818  *  Reed 

I  (other  codes  not  used) 

1 

I  Bits  3-8  >  input/output  dete  bus 
1 

l  Rings  ■  8888-1881  (8-8>  except* 

1 

I  For  tens  of  hours,  bit  2  3  8/1  for  AH/PN 
I  bit  3  *  8/1  for  12/24  hour  clock 

S  For  tens  of  digs,  bit  2  «  8/1  for  normel/leep  peer 
1 

5  Clock  digits  ere  selected  bp  bits  3-8  of  ADRPORT 
1 
1 

;Output  ports* 

m 

DG6ADD  EQU  4C16F  {Leftmost  display  digit 

DG5ADD  EQU4C15F 

DO* ADD  EQU4C14F 

DG3ADD  EQU  4C13F 

DG2ADD  EQU4C12F 

DG1ADD  EQU  4C11F  {Rightmost  display  digit 
1 

;  See  HHSY&81.A  for  definition  of  display  symbols 

•  • 

• 

1 

EXPCPCRT  EQU  (C228  {Experiment  board  output  port 


E-12 


C24# 


C26# 


C28# 


C2M 


C2CI 


I 

SPCHPORT  ECU  tC244  {Speech  port 
• 

;  Bits  7-6  «  pitch  select  (H-ll  for  levels  1-4) 

;  Bits  5-4  »  phoneM  select  (1  of  64) 
l 

{  See  HHSYH68I.A  for  definition  of  phoneM  sgtbols 
I 

STRPORT  ECU  IC264  {Steer  and  wrist  Mtor  port 
1 

{  Bits  7-4  «  output  step  pattern  for  steer  Mtor 

• 

I 

;  Bits  3-4  *  output  step  pattern  fors 
1 

{  Wrist  pivot  Mtor  if  ARHSEL  «  II 

{  Wrist  rotito  Mtor  if  ARHSEL  •  II 

l 

{  ARHSEL  ■  bits  7,6  of  ADRPORT 
1 

EXTPORT  EQU  9C299  {Extend/head/gripper/shoulder  port 
I 

{  Bits  7-4  ■  output  step  pattern  fori 
1 

{  Art  extend  Mtor  if  ARHSEL  «  II 

i  Heed  wotor  if  ARHSEL  ■  II 

1 

{  Bits  3-9  «  output  step  pattern  fori 
I 

{  Gripper  Mtor  if  ARHSEL  «  II 

{  Shoulder  Mtor  if  ttHSEL  »  II 

l 

{  ARHSEL  >  bits  7,6  of  ADRPORT 

5 

DRVPORT  EQU  4C2AI  {Base  drive  port 

• 

I 

{  Bit  7  ■  direction  (I  «  forward,  1  »  reverse) 

1 

;  Bits  6-1  ■  magnitude  of  speed 
1 

;  M4-3F  =  zero  speed  (dead  zone) 

5  449-fF  ■  actual  speed  range 

1 

ADRPORT  EQU  4C2CI  {Address  port 

• 

;  Bits  7-6  >  ARHSEL 

I 

{  11  ‘  select  wrist  pivot,  art  extend,  gripper  totors 

5  II  *  select  wrist  rotate,  head,  shoulder  Mtors 

{  (other  codes  not  used) 

• 

» 

;  Bit  3  »  speech  strobe  (for  phonete  code) 

I 

E-13 


•  i  »  •  •  *  *  k  •  >  •  >  «■.  *  »*••*•«»  ■  •  •  '  k  '  »  •  •  *  >  »  *»  * ,  %  •_  a  -  •  •  «  • 


•a* 


I 

5  Bits  3*4  *  select  real-tine  clock  digit 
• 

;  4449  *  seconds  (1-9) 

I  9991  *  tens  of  seconds  (1-3) 

;  9419  «  ainutes  (4-9) 

I  9911  *  tens  of  einutes  (4-3) 

;  4149  *  hours  (4-9) 

5  4191  8  tons  of  hours  (4-25 

;  4114  «  dag  of  week  (4-4) 

;  till  8  dags  (4-9) 

{  1444  8  tens  of  dags  (4-3) 

}  1441  8  aonths  (4-9) 

I  1914  8  tens  of  aonths  (4-1) 

{  1911  «  gears  (4-9) 

;  11(4  8  tens  of  gears  (4-9) 

e 

PURPORT  EQU  4C2E4  {Power  control  ♦  aiscellaneous 
1 

;  Bit  7  8  Select  light  (l)  or  sound  (4)  sensor 
;  Bit  4  =  Main  power  (9/1  >  OFF/ON) 

;  Bit  5  *  Light/sound  sense  board  power 
;  Bit  4  8  Display  board  power 
;  Bit  3  8  Speech  board  power 
;  Bit  2  8  Motion  detector  power 
t  Bit  1  8  Sonar  power 
;  Bit  9  8  Cassette  tape  output 
1 
1 

{DEFINITION  OF  DISPLAY,  PHONEHE,  AND  OTHER  SYMBOLS 
;  USED  WITH  HERO  ROBOT 
1 

{Version  1.9,  1/14/84,  written  bg  A.  H.  Ballard 
1 

{DISPLAY  (  -€S 

a 

• 

;  The  HERO  display  has  4  digits.  Each  digit  is 
;an  LED  display  assembly  having  7  segments  and  a  dot 
{(deciaal  point)  arranged  in  the  following  pattern. 

a 

|  *'  ’ 

I  —  4 

{  1  1  SEGMENT  15  CODE  BIT 

}  —  PATTERN  4  ASSIGNMENT 

{II  24 

}  —  .  3  7 

1 

{The  segments  to  be  lit  are  identified  by  individual 
{bits  in  an  8-bit  code  character,  as  shown.  Adding  a 
{dot  after  any  character  is  achieved  by  adding  89  hex 
;to  the  original  display  character  code. 

1 


i  A  display  character  will  bt  designated  by 
preceding  it  with  the  '  syabol  (accent  grave). 

\m  NLMBERS 


M7E 

% 

ECU  47E 

M34 

M 

EQU  434 

M6D 

'2 

EQU  MO 

M79 

'3 

EQU  479 

M33 

'4 

EQU  433 

M5B 

'5 

EQU45B 

M5F 

'4 

EQU  4SF 

M74 

'7 

EQU  479 

M7F 

'8 

EQU  47F 

M7B 

'9 

EQU  47B 

M77 

'A 

EQU  477 

MIF 

'B 

EQU41F 

•ME 

'C 

EQU  44E 

M30 

'D 

EQU  430 

•ME 

'E 

EQU  44F 

•M7 

'F 

J 

{LETT 

1 

‘A 

EQU  447 

M77 

ERS 

EQU  477 

;Sate  as  hex  A 

M7D 

'a 

EQU47D 

MIF 

'b 

EQU  41F 

|Saae  as  hex  B 

•ME 

'C 

EQU  44E 

{Saae  as  hex  C 

MW 

'c 

EQU  440 

M30 

'd 

EQU  433 

;Sue  as  hex  D 

•MF 

'E 

EQU  44F 

;Saae  as  hex  E 

M47 

'F 

EQU  M7 

{Sate  as  hex  F 

M5E 

«1 

EQU  45E 

M37 

M17 

M34 

t 

EQU  437 

EQU  417 

EQU  434 

MX 

'J 

EQU  4X 

•ME 

'L 

EQU  44E 

MIS 

'n 

EQU  413 

M7E 

'0 

EQU47E 

;Sue  as  hex  • 

MID 

'0 

EQU  41D 

M47 

P 

EQU  447 

•M5 

'r 

EQU  445 

MSB 

'S 

EQU  45B 

M79 

't 

EQU  479 

{Sue  as  hex  7 

MX 

'U 

EQU  43E 

MIC 

'ti 

EQU41C 

M3B 

EQU  438 

PUNCTUATION 


•Ml 

•088 

AAA* 

fVof 

•8A8 

M22 

•865 

MM 


'•>! 

EQU  Ml 

{Hyphen,  dash  or  ainus 

% 

EQU  M8 

{Underscore 

1 

• 

.  EQU  480 

{Dot  or  period 

t| 

EQU  4A0 

{Exclanation  point 

‘4t 

EQU  422 

{Double  quote 

'? 

EQU  463 

{Question  aark 

‘*P 

EQU  4M 

{Space  or  blank 

PHONEME  CODES 


The  speech  synthesizer  in  the  HERO  accepts  8-bit 
phoneae  codes.  The  lower  6  bits  select  1  of  64  ceded 
phoneaes,  while  the  upper  two  bits  select  l  of  4  pitch 
levels.  The  basic  phoneae  codes  range  froa  4M  to  43F 
at  pitch  level  1.  To  varg  the  pitch  (inflection)  to 
get  greater  naturalness! 

Add  148  to  get  pitch  level  2 
Add  488  to  get  pitch  level  3 
Add  4C8  to  get  pitch  level  4 

The  STOP  phoneae  (43F)  is  the  only  code  that  should 
never  be  raised  in  pitch.  Raising  it  to  IBP  or  IFF 
would  change  its  (leaning. 

A  phoneae  code  will  be  designated  bg  preceding 
it  with  the  *  syabol  (tilde).  Phoneae  durations  in 
Billiseconds  are  shown  in  parentheses  in  the  consents. 


MM 

'EH3 

EQU4M 

;(  59)  as  in  jack_e_t 

•Ml 

EQU  Ml 

{(  71)  as  in  ejrtist 

•M2 

■*€H1 

EQU  482 

;(121)  as  in  h.ea.vg 

•M3 

**P 

EQU  M3 

{(  47)  short  pause 

•M4 

M)T 

EQU  484 

,*(  47)  as  in  bu.tt_er 

AAAC 

vfW 

M12 

EQU  485 

{(  71)  as  in  a_a_de 

•886 

Mil 

EQU  486 

;(183)  as  in  *_a_de 

M07 

'ZH 

EQUM7 

; (  98)  as  in  a_z_ure 

|AAO 

fWO 

*AH2 

EQU  488 

{(  71)  as  in  h_o_nest 

AAAA 

WCVt 

'13 

EQU  489 

;(  55)  as  in  inhlb_i_t 

•88A 

'12 

EQU  48A 

{(  88)  as  in  i_nhibit 

AAAA 

vWD 

'll 

ECU  MB 

;(121)  as  in  inh_i_bit 

Wvw 

Ml 

EQU  48C 

;(103)  as  in  a_at 

MM 

M( 

EQU  MD 

j(  88)  as  in  su_n 

AMP 

VWL 

'B 

EQU48E 

;(  71)  as  in  b_ag 

m 

'V 

EQU  48F 

;(  71)  as  in  v_an 

MM 

EQU  418 

5 (  71)  as  in  ch_ip  ('T  first) 

MU 

'SH 

EQU  411 

;(121)  as  in  sh_op 

M12 

'Z 

EQU  412 

;(  71)  as  in  z_oo 

M13 

'AUl 

EQU  413 

{(146)  as  in  l_aw.ful 

M14 

MC 

EQU  414 

;(12i)  as  in  thi.ng 

E-16 


MIS 

MM1 

ECU  415 

{(146)  it  in  f_i_th«r 

M16 

M»1 

ECU  $16 

; ( 193)  it  in  l_oo_king 

M17 

M» 

ECU  417 

;<185)  it  in  b.oo.k 

M18 

M. 

ECU  418 

;(1?3)  »t  in  l.tnd 

Ml? 

M< 

ECU  11? 

{(  6?)  it  in  tric_k 

MIA 

>1 

ECU  41A 

j(  47)  it  in  ju_dg_o  (M)  first) 

M1B 

Ml 

ECU  41B 

;(  71)  it  in  h.ello 

MIC 

Ml 

ECU  41C 

j(  71)  it  in  g_#t 

MID 

M 

ECU  ilD 

;(1?3)  it  in  f.itt 

M1E 

M) 

ECU  41E 

j(  55)  it  in  pii_d 

M1F 

*S 

ECU  41F 

j(  ??)  it  in  pi_tt 

M2? 

Ml 

ECU  42? 

{(185)  it  in  d.ij 

M21 

MIY 

ECU  421 

; (  65)  it  in  d.if 

M22 

*Y1 

ECU  422 

{(  8?)  it  in  |_iid 

M23 

MJH3 

ECU  423 

;(  47)  it  in  iitt.io.n 

M24 

MW 

ECU  424 

; (25?)  it  in  ■_o_p 

M2S 

M> 

ECU  425 

((1?3)  it  in  p  itt 

M26 

M) 

ECU  426 

; ( 185)  it  in  c.o.ld 

M27 

♦I 

ECU  427 

; (185)  it  in  p.i.n 

M28 

Ml 

ECU  428 

;( 185)  it  in  i_o_v# 

M2? 

*Y 

ECU  42? 

;(1?3)  it  in  tn.j 

M2A 

-1 

ECU  42A 

;(  71)  it  in  t_tp 

M28 

Ml 

ECU  42B 

{(  ??)  it  in  r_«d 

M2C 

* 

ECU  42C 

;(185)  it  in 

M2D 

Ml 

ECU  420 

;(  8?)  u  in  s.in 

M2E 

M£ 

ECU  42E 

| (185)  it  in  d.i.d 

M2F 

MSI 

ECU  42F 

; (103)  it  in  i.ftir 

M3? 

MM2 

ECU  43? 

;(  ??)  it  in  t.ijtj 

M31 

MJH2 

ECU  431 

;(  71)  it  in  i_bout 

M32 

MJH1 

ECU  432 

; (103)  it  in  u_nc)« 

M33 

MJH 

ECU  433 

{(185)  it  in  c.u _p 

M34 

M2 

ECU  434 

j(  8?)  it  in  f_o_r 

M35 

M)1 

ECU  435 

; ( 121)  it  in  ib_Oi_rd 

M36 

MU 

ECU  436 

;(  5?)  it  in  |_ou 

M37 

MU 

ECU  437 

;(  ??)  it  in  |_ou 

M38 

MHV 

ECU  438 

;(  8?)  it  in  th  « 

M3? 

>TH 

ECU  43? 

;(  71)  it  in  thjn 

M3A 

MR 

ECU  43A 

{(146;  if  in  b.ir.d 

M3B 

MH 

ECU  43B 

;(185)  it  in  g_«_t 

M3C 

Ml 

ECU  43C 

;(121)  it  in  b  • 

M3D 

MM 

ECU  43D 

; (250)  it  in  c_i_ll  • 

M3E 

Mp 

EQU  43E 

;(185)  long  piut* 

M3F 

*ttop 

ECU  43F 

;(  47)  no  found 

1 


;HERO  COMMAND  INTERFACE  ROUTINES  -  C  language  Interact 
1 

{Version  6 

{Written  by  A.  K.  Ballard,  11/21/83 
{Updated  7-6-84 
J 

;  These  routines  allow  external  program  to  interface 
{with  the  Mtors,  sensors,  speech,  and  other  subsystems 
;in  the  Hero  1.x  robot.  The  interface  is  implemented 
;as  a  series  of  subroutine  calls.  The  parameters,  or 
{operands,  for  each  subroutine  are  first  pushed  onto  the 
;stach.  AH  operands  have  16  bits,  with  right  justifi¬ 
cation.  The  last  operand  is  stacked  first,  and  the 
{first  operand  is  stacked  last.  A  subroutine  call  is 
{then  wade  to  one  of  the  85  jump  vectors  provided  at  the 
{beginning  of  this  prograa. 

5 

;  In  this  version,  35  of  the  38  interpreted  HERO 
{commands  are  included  in  the  jump  table,  althougth  the 
•SLEEP  is  not  actual l|  implemented  in  this  version.  The 
;CRL  (change  to  robot  language)  and  CHL  (change  to 
{machine  language)  are  not  included  because  they  are 
;not  appropiate  for  external  use.  The  JISP  (jump  if 
{speaking)  command  is  actually  a  subroutine  call  to  a 
{lower  level  in  the  phoneme  tree,  and  is  rot  included 
{either.  Room  for  expansion  to  a  total  of  85  commands 
;is  provided  in  the  jump  table. 

5 

;  Maximum  use  is  made  of  subroutines  which  already 
{exist  in  the  Hero  ROM.  Where  nu  operands  need  to  be 
{passed,  it  is  usually  possible  io  jump  directly  to  an 
{existing  ROM  subroutine.  Where  one  or  more  operands 
{have  to  be  passed,  they  are  reformatted  in  this  pro¬ 
gram  to  satisfy  the  entry  conditions  required  by 
{existing  ROM  subroutines. 

I 

{Entry  points  in  existing  ROHi 
5 

AGM  EQU  4E390  {First  of  16  direct  entry  points 

ASM  EQU  4E399  I  (see  jump  table  for  cotments) 

MM  EQU  4E39D 

ASP  EQU  IE 382 

ZERO  EQU  IE417 

RTE  EQU  (F423 

ENEYE  EQU  4E8A? 

ENEAR  EQU  4E8AD 
ENSON  EQU  4E0B8 
ENMDT  EQU  4E0BC 
ENDIS  EQU  4E0C8 
DISEYE  EQU  4E0CA 
DISEAR  EQU4E0D5 
DISSON  EQU  4E0EI 


DISHDT  EQU4E4E4 

DISOIS  EQU  4E4E8 
• 

SPKEXTRN  EQU  IE35F 
PSE.EXT  EQU  4E499 
MVR.EXT  EQU  4E169 
HVI.EXT  EQU  4E114 
HVX.EXT  EQU  4E1S1 
HVE.EXT  EQU  4E12A 
MV  ALL  X  EQU4E1FC 
ORDIS  EOU  SF65B 
OUTSTR  EQU4F7E5 
I 


;L*st  of  16  direct  entry  points 

{External  entry  for  speaking 
{External  entry  for  PAUSE 
;Ext.  entry  for  Rove  relative 

;Ext.  entry  for  dove  ixaediate 

;Ext.  entry  for  nove  indexed 

;Ext.  entry  for  nove  extended 

{External  entry  for  nove  all 
{Clear  HERO  Display 
{Output  string  to  HERO  Display 


{Exit  points  in  existing  ROM* 

1 

{These  locations  are  juaps  or  jsr's  to  USER  routines  located  at  the 
I  addresses  stated* 

1 

I  HOD-HERO  INTERPRETER  HOCE 

{THE  FOLLOWING  EXPECT  A  JUMP  OR  RTS  INSTRUCTION  AT  TIC  TO  ADDR 


UEXCYCLE  EQU  iEMl  {JSR  TO  USRCYCLE— STMT  OF  INTERPRETER  CYCLE 

UEXINTRP  EQU  4EC24  {JSR  TO  USRIMTRP — EXTENSION  OF  INTERPRETER  COO 

I 

|  IRQ  INTERRUPT  iAOERS 

{THE  FOLLOWING  EXPECT  A  JWf>  OR  RTS  INSTRUCTION  AT  TIC  TO  ADDR 


UEXIRQ  EQU  4EFCC  {JSR  TO  USRIRQ — CUSTOMIZED  IRQ  HANDLER 

UEXCLOCK  EQU  4F01E  {JSR  TO  USRCLOCX--CUSTOMZED  CLOCK  INT  HANDLER 

UEXSPD  EQU  4F02E  {JSR  TO  USRSPD — CUSTOMIZED  DRIVE  SPEED  HANDIER 

UEXLLB  EQU  IF256  {JSR  TO  USRLLB — LOW  LOGIC  BATTERY  VOLTAGE 

UEXLD8  EQU  4F2D9  ;JSR  TO  USRLDB — LOW  DRIVE  BATTERY  VOLTAGEE 

UEXHDT  EQU  4FW4  ;  JSR  TO  USRMDT — NOTION  DETECTOR  HANDLER 

UEXTRG  EQU  4FW8  {JSR  TO  USRTRO — TEACHING  PENDENT  TRIGGER 

UEXEXP  EQU  4F912  {JSR  TO  USREXP — EXPERIMENTAL  PORT  IRQ  INT 

I 

;  HOD-HERO  EXECUTIVE  HJD6 


UEXUSER1 

UEXUSER2 

UEXUSER3 

l 


JSR  TO  USER1 — USERI  KEY  DEPRESSED 
LOADS  LOCATION  USER2  INTO  A,B  REG  3EF0RE  JUH» 
JSR  TO  USER2 — USER2  KEY  DEPRESSED 
LOADS  LOCATION  USER2  INTO  A,B  REG  BEFORE  JUMP 
JSR  TO  USER3 — USER3  KEY  DEPRESSED 
LOADS  LOCATION  USER3  INTO  A,B  REG  BEFORE  JUff 


4423 


5  USER  DECLARED  TABLES 

(NEC  EQU  35  {Current  nutber  «f  jgap  vector! 


2143  SFKTAB  RHB  1  {Table  of  phrase  addresses 

2144  P0S1TAB  RK  1  {Title  of  Mtor  poiitioni 


;RA«  locution!  for  pirueteroi 


e 


1421  CPOSTAB  EQU  44424  {CURRENT  MOTOR  POSITION  TABLE 

492B  ACTSTAT  EQU  4442B  {Activity  lUtu*  byte 

4F24  ACTHASK  EQU  44F24  {Hi!k  to  select  ACTSTAT  bit! 

1 

I 

C224  EXP  OUT  EQU  4C224  {DP  OUT  ADOR  DPERIHENTAL  BOARD  OUTPUT  BYTE 

C2A4  EXPJNA  EQU  4C2A4  {EXP.IN.ADOR  DPERIHENTAL  BOARD  INPUT  BYTE 

5 

4423  NVEC  EQU  35  {Current  nuab«r  of  juap  vector! 

i 
i 
1 
1 

2145  39  RTRN  RTS  {Defiult  for  unitplescnted 

{routine! 

1 

1 

I 

l 

1 

{ activity!) 

activity 

5< 

;  char  »itat| 

;  /*  check  if  Rotors  are  currently  running,  return  true  if  they  are, 

;  false  otherwise.  */ 

I 


;  sHt  =  ACTSTAT} 

5  return  (*stat  4  4x4F){ 


2146 

2148 

C6  4F 

24  4E 

1> 

1 

LDAB  444F 
BRA  BUSY 

{LOAD  MASK  FOR  ACTSTAT 

L14C 

C A  41 

24  4A 

BBSY 

LDAB  *41 

BRA  BUSY 

{Activity  bit  for  base 

214E 

a  42 

SBSY 

LDAB  442 

{Activity  bit  for  steering 

2154 

24  46 

BRA  BUSY 

2152 

2154 

C6  44 

24  42 

ABSY 

LDAB  444 

BRA  BUSY 

{Activity  bit  for  ari/head 

E-24 


L'-- 

Wf 

’ 

k  • 

«.  • 

!•  t  m 

21% 

C6  88 

VBSY 

5 

BUSY 

LDAB  888 

; Activitg  bit  for  voice  ( speech) 

2156 

04  28 

ANDO  ACTSTAT 

{Test  busy  status 

V, 

2156 

4F 

CLRA 

2158 

39 

S 

l 

1 

s 

• 

spux 

RTS 

{Return  with  D  ■  6  if  not  busg 

i 

215C 

86  88 

LDAA  888 

{Setup  Mit  fer  speech 

215E 

28  81 

s 

SPCX 

BRA  SPCX.l 

2166 

4F 

CLRA 

{Setup  to  continue 

H 

2161 

87  8F28 

SPCX.l 

STAA  ACTHASK 

t 

*  *  •  i 

2164 

38 

TSX 

“.*  ’  ! 

2165 

E6  83 

LDAB  3,X 

;B  *  phrase  nuaber 

.  "t  ■ 

2167 

58 

ASLB 

;B  «  address  offset 

2168 

FE  21  43 

LDX  SPKTAB 

{Point  to  phrase  table 

4, ; 

2168 

3A 

ABX 

{Point  to  phrase  address 

2160 

E6  88 

LDAB  6,X 

fs  j 

216E 

A6  81 

LDAA  1,X 

;BA  «  phrase  address 

f?:l 

2178 

7EE3  5F 

5 

SPUE 

JW>  SPKEXTRN 

^  *  1 

r  *  * 

2173 

86  88 

LDAA  888 

{Setup  wait  for  speech 

2175 

28  81 

BRA  SPCE.1 

a  c 

1 

i 

-  •  i 

2177 

4F 

SPCE 

CLRA 

{Setup  to  continue 

! 

2178 

B7  6F26 

SPCE.1 

STAA  ACTHASK 

217B 

38 

TSX 

•V.  i 

217C 

E6  62 

LDAB  2,X 

bb! 

217E 

A6  83 

LDAA  3,X 

{BA  *  phrase  address 

■ 

•  . 

2188 

7EE3  5F 

1 

PAUSE 

Jff>  SPKEXTRN 

2183 

38 

TSX 

2184 

EE  82 

LDX  2,X 

;IX  *  count  (1/16  sec  steps) 

2186 

7EE4  99 

S 

SLEEP 

Jf>  PSE.EXT 

r 

i — 

2189 

7E21  45 

Jf  RTRN 

{Not  currently  impleeented 

218C 

86  87 

hvur 

LDAA  887 

{Setup  Rotor  wait  bits 

218E 

28  81 

i 

flVCR 

BRAHVCR.l 

£ 

2198 

4F 

CLRA 

{Setup  to  continue 

2191 

B7  8F  26 

MVCP. 1 

STAA  ACTMASK 

-  -  t 

*-  Ji 

2194 

38 

TSX 

t: 

2195 

EE  62 

LDX  2,X 

;IX  *  2-byte  operand 

• .  * 

2197 

7E  El  69 

1 

HVWI 

Jf  HVR.EXT 

{Use  existing  RON  routine 

2196 

86  67 

LDAA  887 

{Setup  aotor  wait  bits 

1  - 

219C 

28  61 

< 

BRA  HVCI.l 

E-21 

i : 

.V, 

^■;.s.vv- 

.  *  «  ■  .  *  •  •* .  •"* 

S-lvS-lv/ 

-  •  .*  .  <  .  '  . 

,•  .*  ,*  *  ,•  ,•  •  «  ,*  •  «  •  »  •  -  •  •  **••«*•••*  «  *  « ■»  *•**■*  a  •  *» 

^  i*.  «•-  V  \r  ".-  V  '  * 

r 

”•*  ^ 

► 

t 

1 

| 

219E 

4f 

W Cl 

CLRA 

{Setup  to  continue 

f 

- 

21 9F 

B7  4F  21 

nvci.i 

STAA  ACTHASK 

f 

21A2 

31 

TSX 

K 

k' 

21  A3 

EE  12 

LDX  2,1 

;IX  >  2-bgte  operand 

k* 

21AS 

7EE1  14 

i 

WWX 

JW»  Wl.EXT 

{Use  existing  RON  routine 

21A8 

8617 

LOAA  H7 

{Setup  notor  Mit  bits 

1 

21AA 

21 11 

1 

nvcx 

BRA  HVCX.l 

21  AC 

4F 

CLRA 

{Setup  to  continue 

21AD 

B7  6F2I 

HVCU 

STAA  ACTNASK 

21M 

31 

TSX 

21B1 

E6I3 

LDAB  3.X 

;B  ■  position  index 

f 

21B3 

58 

ASLB 

;B  »  sddress  offset 

B 

21B4 

FE21  44 

LDX  POSITAB 

{Point  to  tsble  of  positions 

21B7 

3A 

ABX 

{Point  to  selected  position 

21B8 

7EE1  51 

JK>  RVX.EXT 

{Use  existing  RON  routine 

21BB 

8617 

rtVWE 

LOAA  887 

{Setup  notor  Mit  bits 

21BQ 

2#  11 

BRA  WCE.l 

1 

1 

21BF 

4F 

HVCE 

CLRA 

{Setup  to  continue 

21  Cl 

B7IF2I 

WCE.l 

STAA  ACTHASK 

21C3 

31 

TSX 

21C4 

EE  12 

LDX  2|X 

{IX  *  oddress  of  operand 

i 

flf 

21C6 

7EE1  2A 

1 

WALL 

JM>  WE.  EXT 

{Use  existing  RON  routine 

21C9 

31 

TSX 

", 

21CA 

•8 

INX 

a 

21C8 

M 

I  NX 

;IX  will  point  to  1st  operand 

l 

21CC 

A6I1 

LOAA  1,X 

21CE 

A7  88 

STAA  8,X 

{1st  operand  *  EXTPOS 

21D8 

A6I3 

LOAA  3,X 

E 

2102 

A7I1 

STM  1,X 

{2nd  operand  *  SHLPOS 

• 

2104 

A6I5 

U)M  5|X 

to 

2106 

A7  82 

STM  2,X 

{3rd  operand  ■  RQTPOS 

2108 

A6  47 

LOM  7,  X 

i 

21DA 

A7I3 

STM  3,X 

;4th  operand  s  PVTPOS 

21  DC 

A6  8? 

LOM  9,X 

21DE 

A7  84 

STM  4,X 

;5th  operand  *  GRPPOS 

% 

T  .• 

21EI 

A6IB 

LOM  11,X 

21E2 

A7  05 

STM  5,X 

5 6th  operand  *  HEDPQS 

21E4 

A6  80 

LOM  13, X 

", 

£ 

21E6 

A7I6 

STM  6,X 

;7th  operand  *  STRPf* 

l 

21E8 

7EE1  FC 

; 

m 

JKP  WALL! 

21EB 

31 

TSX 

21EC 

C6  4# 

LDAB  481888888B  ;SET  FOR  SLOW  SPEEO 

*, 

21EE 

A6  63 

LOM  3,X 

;A  NOW  IS  NOTOR  INDEX 

21F4 

14 

LSRO 

{ALIGN  BITS  IN  B  REG 

r 

• 

21F1 

84 

LSRO 

h 

C-;-> 

21F2 

84 

LSRO 

b 

E-22 

. 

V 

** 

>; 

|v 

« • » • 

v  vV’A 

•.v.v.  /v.v.  <\ 

'Vo  l*  •.*  v-  «.• 

21P3 

A6I9 

LOAA 

3,1 

;A  IS  POSITION 

21F5 

36 

psm 

{  NOTE  FOLLOWING  REVERSAL  FROM  STANDARD  PUSH 

21F6 

37 

PSW 

.  «««< - ORDER 

21F7 

38 

PHI 

1  II  ■  2-BYTE  OPERAND 

21F8 

7EE1  14 

1 

Jf 

HVI.EIT 

;  GO  TO  HERO  ROM  AND  RETURN 

•F24 

1 

SRC.H 

EQU 

49F24 

9F22 

DEST.H 

EQU 

49F22 

E291 

HOVE.H 

1 

HAXPOS 

ECU 

4E291 

21FB 

CE  22  1C 

IDS 

•HAXTBL 

{POINT  TO  TABLE  OF  HAX  POSITIONS 

21FE 

FFCF24 

ST7 

SRC.H 

;49F24  IN  HERO  RAN 

2291 

CE  99  21 

LSI 

KPOSTAB  {49929  IN  HERO  RAH 

2294 

FF9F22 

sti 

DEST.H 

;  49F22  IN  «R0  RAH 

2297 

C6  97 

LDAB 

•7 

{  COUNT  IS  7  BYTES 

2299 

7EE2  91 

JHP 

HOVE.H 

{4E291  IN  HERO  RON 

229C 

98  86  93  A5 

HAXTBL 

FC8 

498,486, 493, 4A3,473, 409,493 

2219 

75C9  93 

I 

I 

1 

{EXPOUTCc) 
i  char  cj 
EIPOUT 

j{  EXPOUTPUT  *  c{  /*  output  the  do to  to  the  experimenter  port  V 


2213 

39 

TSI 

2214 

E6  93 

ldab 

3,1 

2216 

F7C2  29 

stab 

1) 

4C229 

2219 

39 

RTS 

jEIPINPO 

EXPINP 

;{  return  EIPINPOT  ;  /*  input  the  data  from  the  experimenter  port  »/ 

221A 

4F 

dra 

221B 

F6C2  A9 

ldab 

4C2A9 

221E 

39 

RTS 

I 

I 

;  The  following  equates  ttote  how  the  functions  in  Henos  utilize  the 
{routines  above.  Please  do  not  assume  that  Henos  uses  ell  of  the 
;ibove  routines.  Henos  must  never  wiit  too  long  for  i  routine  (such 
;as  zero)  to  execute,  ind  thus  hts  equivalent  routines,  with  the  names 
{given  as  below,  which  perform  the  function  of  the  above  routines. 


E399 

abmvec  EQU 

ABM 

{Abort  base  motor 

E399 

asmvec  EQU 

ASM 

{Abort  s  eering  motor 

E39D 

aamvec  EQU 

AAM 

{Abort  arm/head  motors 

E3B2 

aspvec  EQU 

ASP 

{Abort  speech 

214A 

bbsgvec  EQU 

BBSY 

{Test  for  base  buss 

214E 

sbsyvec  EQU 

SBSY 

{Test  for  steering  busy 

2152 

tbtgvoc  EQU 

ABSY 

2156 

vbtgvoc  EQU 

VBSY 

E417 

zrovoc  EQU 

ZERO 

F423 

rtovoc  EQU 

RTE 

E4A9 

oldvoc  EQU 

EfCYE 

E4AD 

Ofdvcc  EQU 

ENEAR 

EW8 

ourvee  EQU 

ENSON 

EWC 

ckdvec  EQU 

EMOT 

E4C4 

odtvoc  EQU 

EM)1S 

E4CA 

dldvoc  EQU 

D1SEYE 

EW5 

dtdvoc  EQU 

DISEAR 

E0E# 

dome  EQU 

DISSON 

E0E4 

dkdvoc  EQU 

DISKIT 

E0E8 

ddtvoc  EQU 

D1SD1S 

215C 

tpwxvoc  EQU 

SPWX 

2161 

fpcxvoc  EQU 

SPCX 

2173 

tpwevee  EQU 

SPUE 

2177 

tpcovoc  EQU 

SPCC 

2183 

ptovoc  EQU 

PAUSE 

2189 

tlpvoc  EQU 

SLEEP 

219A 

kwivee  EQU 

nvwi 

219E 

keivee  EQU 

HVCI 

218C 

kwrvoc  EQU 

HVWR 

219# 

kervee  EQU 

HVCR 

21A8 

kwxvcc  EQU 

HVWX 

21AC 

kcxvec  EQU 

HVCX 

21B8 

kwovee  EQU 

HVUE 

21BF 

kcevec  EQU 

HVCE 

21C9 

kvlvoc  EQU 

KVALL 

21FB 

fktrktx  EQU 

mxpos 

21EB 

ktravee  EQU 

m 

221A 

oxpinpvo  EQU 

EXPINP 

2213 

oxpoutvo  EQU 

1 

1 

1 

PORCH  EQU 

EXPOUT 

F37E 

4F37E 

7EFD 

RTW  EQU 

♦7EFD 

221F 

EM) 

; T « i t  for  trkfhetd  butg 
{Toft  for  voico  (tpeech)  bui| 
jlnititlizo  til  itcppor  totort 
{Return  to  executive  kode 
{Entble  light  dotoctor  (ego) 

{Entble  found  dotoctor  (otr) 

;Entblo  ultrasonic  ringer 
;Entblc  kotion  dotoctor 
{Entble  ditpltg 
{Diitble  light  dotoctor  logo) 

{Distblo  found  dotoctor  (otr) 

;Dittblo  ultrtfonic  rtngor 
{Dittble  kotion  dotoctor 
{Dittble  ditpltg 
jSpotk  tnd  wtit  (indoxod) 

; Spook  tnd  continuo  (indoxod) 

;Spetk  tnd  wtit  (oxtondod) 

;Spotk  tnd  continuo  (oxtondod) 

{Piute  for  tpocifiod  tito 
{Sloop  for  tpocifiod  tiko 
{Hove  tnd  wtit  (ikkcditto) 

{Hove  tnd  continuo  (itkoditto) 

{Hove  rolttixo,  wtit  (ikkcditto) 

{Move  rolttivo,  continuo  (ikkod) 

{Move  tnd  wtit  (indoxod) 

{Hove  tnd  continuo  (indoxod) 

{Hove  tnd  wtit  (oxtondod) 

{Hove  tnd  continue  (oxtondod) 

{Hove  til  7  t topper  wotort 
;Sot  til  kotor  potition  rogittort  to  ktx 
; Spocit 1  HVCI  it  ktdiuk  tpood 
{Got  oxpcrikonttl  botrd  input 
{Output  bgto  to  oxporikonttl  port 


{WARM  START  ADDRESS — KO  RETURN  EXPECTED 
{RETURN  TO  MOD-HERO  IN  VERSION  l.IB  OF  VAMP 
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SYMBOL  TABLE  FOR  FILE:  DR1VEDEF.A 


AAH 

E39D 

ABM 

E39B 

ABSY 

21S2 

ABTSTAT 

M2C 

ACNT 

MIS 

ACTIVATE 

•F21 

ACTMASX 

BF2« 

ACTSTAT 

M2B 

ADOR 

•F2E 

AOORPTR 

•F2C 

ADRPCPY 

•FB2 

AORPORT 

C2CB 

AfiHBACX 

•Ml 

ARMOR 

CF4B 

ARKSTOP 

•F42 

ARttSTP 

(EFB 

ASM 

E399 

ASP 

E382 

BASEOP 

•F44 

BBSY 

214A 

BKPNTSTK 

•FEC 

8KTBL 

•FEB 

BUSY 

2158 

aCKPORT 

C3M 

clcktnc 

•EFC 

CLRDIS 

F65B 

CNTR 

•M9 

C0L1 

CM3 

COL2 

CM5 

ca.3 

cbm 

CPOSTAB 

M2B 

CR3 

MBF 

DCRl 

MM 

DOR1CPY 

MM 

D0R2 

MOl 

D0R3 

M04 

D0R4 

4AAC 

DELAYTM 

•F43 

BEST 

•F22 

DEST.H 

•F22 

DC  1  ADO 

Cl  IF 

DC2A00 

C12F 

DC3ADD 

C13F 

DG4A0D 

C14F 

DG5AOO 

C15F 

DG6ADD 

C16F 

D1GADD 

•FF2 

DIR 

•F3C 

DISDIS 

E0E8 

DISEAR 

EBDS 

DISEYE 

EBCA 

D1SLMDE 

•F4E 

DISMDT 

E6E4 

D1SSON 

EBEB 

DR1 

MB2 

0R1CPY 

MBF 

0R2 

MW 

DR2CPY 

•M4 

DR3 

MM 

DR4 

MB7 

BRVNO 

•EFD 

DRVOOH 

M29 

ERVON 

•F3E 

DRVPCPY 

•FM 

DRVPNEM 

•FBI 

DRVPORT 

C2A« 

DRVPOS 

M27 

DSHDIR 

•FFB 

DSffTR 

•FF9 

ENDIS 

E0CB 

ENEAR 

EBAD 

ENEYE 

EM? 

ENHDT 

EIBC 

ENSON 

EBB8 

EXPINP 

221A 

DPIPORT 

C2AB 

EXPOPGRT 

C22B 

EXPOUT 

2213 

EXP  IN  A 

C2AB 

EXP_OUT_ 

C22B 

EXTPORT 

C28B 

E3TTPOS 

M2B 

FR5TADDR 

QF32 

GRPPOS 

M24 

ICDPCS 

M25 

HUNGRY 

M2F 

ICfil 

•MB 

ICR2 

M1E 

IRQPCPY 

•F64 

IMPORT 

C2M 

IRQ  PORT 

C2M 

ISARH 

•F3D 

ISOLD 

•F3A 

LASTADOR 

•F34 

LIMIT 

C2M 

LIMPCRT 

C26B 

LRMOOE 

•F36 

HAXPOS 

21FB 

HAXTBL 

22BC 

NCB 

•FIE 

m 

21EB 

MODE 

•EE1 

MONSTK 

•F98 

HOVE.H 

E291 

MTR 

•F4A 

MTRSPD 

•FIB 

WALL 

21C9 

WALLOP 

•F26 

WALLX 

E1FC 

HVCE 

2IBF 

HVCE.l 

21CB 

WCI 

219E 

HVCI.l 

219F 

MVCR 

219# 

MVCR.l 

2191 

WCX 

21  AC 

nvcx.i 

21AD 

NVE.EXT 

E12A 

MVI.EXT 

E114 

MVR.EXT 

El  69 

HVWE 

21BB 

MVHI 

219A 

HVUR 

218C 

wwx 

21A8 

HVX.EXT 

E151 

NVEC 

M23 

OCRi 

•MB 

0CR2 

MIA 

0CR3 

MIC 

OLDADDR 

•F3B 

OLDDIR 

•F38 

OLDDIS 

•F4C 

OLDUfC 

•F4F 

OLDPOS 

•F39 

OH®  .CT 

•F37 

OPCODE 

•F47 

OUTSTR 

F7E5 

PAUSE 

2183 

PCSAVE 

•EE2 

POS 

•F48 

POSITAB 

2144 

PSE.EXT 

E499 

PVTPOS 

M23 

PURON 

F37E 

PWRPCPY 

•FW 

PURPORT 

C2EB 

PURSTK 

8FD8 

PURTEMP 

•EOF 

RAHC 

M14 

RDR 

M12 

REMPORT 

C280 

REVADDR 

0F2A 

REVPOS 

•F28 

nyrn 

Wwi 

M1B 

ROTPOS 

M22 

RTE 

F423 

RTW 

7EFD 

RTRN 

214S 

RXBUFF 

BEDE 

RXSTAT 

•EDO 

SBSY 

214E 

SENSE 

C24B 

SENSPORT 

C24B 

SUPOS 

M21 

SLOT 

•F3B 

SLEEP 

2189 

SLEEPER 

8020 

SNRHIT 

M3B 

STCPORT 

C22B 

SMRRNG 

M31 

SNRTIHR 

C220 

SPCE 

2177 

SPCE.l 

2178 

SPOTORT 

C24B 

SPCX 

216B 

SPCX.l 

2161 

SPD 

•F4B 

SPKEXTRN 

E35F 

SPKTAB 

2143 

SPSAVE 

•F56 

SPSKMEA 

•res 

SPSXFUA 

•FIS 

SPSKLUA 

•F17 

SPSKPTR 

0F19 

spue 

2173 

SPWX 

215C 

SRC 

0F24 

SRC.H 

•F24 

STPPTR 

•F52 

STRCTADR 

0F1C 

STRGON 

0F3F 

STRPCPY 

•EH- 

STRPORT 

C264 

STRPOS 

M26 

STRSP 

•EE4 

SYSSMI 

•FF6 

T# 

*39 

Tl 

6658 

T2 

6650 

TORI 

*17 

TCR2 

*18 

TCSR 

66* 

TOR 

*13 

TE6 

•FEE 

TEl 

IFF# 

TEACHING 

C296 

TEMPI 

6F54 

TINE1 

6FFC 

THC2 

•FFE 

TRCS 

*11 

TRIGIN 

6F45 

TSR 

*19 

UEXaOCK 

F61E 

UEXCYCLE 

EMI 

UEXEXP 

F612 

UEXINTRF 

E624 

UE I  IRQ 

EFCC 

LEXLD8 

F20? 

UEXLLB 

F256 

UEXffflT 

F6* 

ICXSPO 

F62E 

UEXTRO 

FM8 

UEXUSER1 

F53B 

UEXUSER2 

F541 

UEXUSER3 

F547 

USER1 

6656 

USER2 

6653 

USER3 

*56 

USERS 

6FF4 

USRaOCK 

*38 

USRCYCLE 

*32 

USREXP 

6*0 

USRINTRP 

*35 

USRIRQ 

*38 

USRLOB 

6644 

USRLLB 

6*1 

USRHDT 

*47 

USRRAH 

665F 

USRSPD 

*3E 

USRSTK 

6F58 

USfiTRG 

|41A 

TVtTI 

VBSY 

2156 

XTEW» 

6F56 

ZERO 

E417 

MM 

% 

• 

66* 

‘6 

M7E 

M 

6636 

'2 

*60 

‘3 

*79 

‘4 

6633 

'5 

6658 

'4 

*5F 

'7 

*76 

‘8 

*7F 

'? 

*7B 

'? 

*65 

'A 

*77 

*1 

*IF 

'C 

M4E 

'D 

*30 

‘E 

664F 

‘F 

6*7 

'0 

665E 

*37 

'I 

66* 

‘J 

MX 

'L 

666E 

‘0 

*7E 

‘S 

6658 

‘U 

663E 

% 

66* 

*« 

*70 

‘b 

M1F 

‘c 

6*0 

'd 

*30 

'h 

*17 

‘h| 

6*1 

‘n 

*15 

*• 

*10 

> 

*67 

'At 

6622 

*p 

6665 

'*P 

66* 

't 

*76 

MIC 

'1 

6638 

turn 

E3?D 

ibtvtc 

E396 

*bsyv«c 

2152 

activity 

2146 

iMVfC 

E399 

ttpvcc 

E3B2 

bbtjvtc 

214A 

ddivcc 

E6E8 

d 1 d vac 

E6CA 

dadvcc 

E6E4 

d*dv*c 

E6D5 

dUPV«C 

E6E6 

tdlVfC 

E6C6 

tldvtc 

E6A9 

Mdvtc 

E68C 

•idvtc 

E6AD 

*<JPV*C 

E688 

txpinpv* 

221A 

txpoutv* 

2213 

■CtVK 

21BF 

■civec 

219E 

Mcrvcc 

21* 

■cxvcc 

21AC 

■poi 

6626 

■trsvtc 

21EB 

avlvcc 

21C9 

Mtvtc 

2168 

Mivec 

21?A 

■vrvec 

219C 

MXVtC 

21A8 

ptcvtc 

2183 

rt»v*c 

F423 

ibiyvtc 

214E 

*lpv«c 

218? 

sitrMx 

21FB 

spctvtc 

2177 

ipcxvtc 

2166 

ipwtvcc 

2173 

spvxvtc 

215C 

vbijvtc 

2156 

ZPCV*C 

E417 

'A 

6626 

'Al 

6666 

M12 

•665 

'AE 

662E 

MCI 

662F 

'Ml 

6624 

'Mil 

*15 

'AH2 

66* 

'AH 

*30 

'AHl 

*13 

'MC 

M36 

'AY 

6621 

'3 

666E 

'CH 

*16 

'D 

M1E 

'DT 

66* 

< 

662C 

<1 

MX 

'EH 

*38 

'EM 

6662 

«EH2 

6*1 

'EH3 

66* 

'ER 

*3A 

'F 

*10 

*6 

*1C 

Ml 

661B 

'I 

*27 

'll 

66* 

M2 

666A 

'13 

666? 

'IU 

*36 

'J 

MIA 

MC 

*1? 

M. 

*18 

Ml 

frvU 

Ml 

6*0 

'NO 

*14 

'O 

*26 

'Ol 

*35 

*02 

*34 

'00 

*17 

'001 

*16 

M> 

*25 

Ml 

6628 

'S 

M1F 

'SH 

*11 

'T 

M2A 

'TH 

*39 

'THV 

*38 

MJ 

*28 

'Ul 

6637 

MJH 

*33 

'UHl 

6632 

'UH2 

6631 

MJH3 

6623 

'V 

666F 

Ml 

*20 

'Y 

662? 

'Y1 

*22 

'Z 

*12 

'ZH 

6*7 

'lp 

*3E 

'<p 

6*3 

'•top 

*3F 
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APPENDIX  F 


Navigation  Cotputor  Parts  List 


Ut  LOC.  TYPE 

SPINS 

PARTS  USED 

♦5VDC 

GRCf'ID  +6 

1  DC-DC 

24 

ALL 

1 

18, 12,13,15 

•  AA37  DC-DC 

24 

ALL 

1 

11,12,13,14 

1  AA15  6892 

48 

ALL 

2,3,8,35 

1,21 

2  ADI  74LS244 

28 

ALL 

28 

18 

3  AD14  74LS244 

28 

ALL 

28 

18 

4  AD26  74LS245 

28 

ALL 

28 

18 

5  AD38  74LS245 

28 

ALL 

28 

18 

6  AF1  74LS84 

14 

1,2, 3,4 

14 

7 

7  (f  11  74LS14 

14 

1,2,3,4,11,15, 

14 

7 

13,14 

8  AF18  74LS138 

16 

ALL 

16 

8 

9  AF28  74LS138 

•6 

ALL 

16 

8 

18  AF38  74LS88 

14 

1,2, 3, 4, 5, 6 

14 

7 

11AH1  EDH8808 

28 

ALL 

2ft 

14 

12  AH18  EDH8888 

28 

ALL 

28 

14 

13  AK34  EDH8888 

28 

ALL 

28 

14 

14BB1  EDH6898 

28 

ALL 

28 

14 

15  BB18  EDH8848 

28 

ALL 

28 

14 

>6  BB34  ECH8888 

28 

ALL 

28 

14 

17BE1  6858 

24 

ALL 

12 

1 

18  BE18  2764 

28 

ALL 

1,26,28 

14 

19  BE34  14411 

24 

ALL 

2'i 

12 

28  SHI  6858 

24 

ALL 

12 

1 

21  BH28  6821 

48 

ALL 

28 

1 

22  BH42  1488 

14 

7 

23CB1  74125 

14 

1,2, 3,4, 5, 6 

t4 

1,7 

24  CB28  6821 

48 

ALL 

28 

1 

25  CB42  1.<j9 

14 

14 

7 

26CE1  6848 

28 

T1,T2 

14 

l 

27  CE18  6848 

28 

T1,T2 

14 

1 

28CE34  6848 

28 

T3 

14 

1 

29  Ml  75468 

16 

ALL 

9 

8 

38  CJ18  75468 

16 

ALL 

9 

8 

31  CJ29  75468 

16 

ALL 

9 

8 

32  CJ38  75468 

16 

ALL 

9 

8 

?3CJ4v  75468 

16 

ALL 

9 

8 

34  DC1  RELAY 

14 

A8 

2 

35DC9  RELAY 

14 

B8 

2 

36  DC17  RELAY 

14 

08 

2 

37  DC25  RELAY 

14 

D8 

2 

WLOC.  TYPE 

•PINS 

PARTS  USED 

♦5VDC 

GROUND 

+6VDC 

38  0C33  S2 

16 

ALL 

39  DC42  SI 

16 

ALL 

41  DEI  RELAY 

14 

A1 

2 

41  DE9  RELAY 

14 

81 

2 

42  DE17  RELAY 

14 

Cl 

2 

43  DE25  RELAY 

14 

D1 

2 

44  DE33  74LS74 

14 

14 

7 

45  DE42  74LS74 

14 

14 

7 

46  OG1  RELAY 

14 

A2 

2 

47DG9  RELAY 

14 

82 

2 

48  DG17  RELAY 

14 

C2 

2 

49  DG25  RELAY 

14 

D2 

2 

54  0633  75468 

16 

SPARE 

9 

8 

51  DG42  7444 

14 

1,2, 3, 4, 5, 6, 8, 9  14 

7 

52  DJI  RELAY 

14 

A4 

2 

S3  DJ9  RELAY 

14 

84 

2 

54  DJ17  RFAY 

14 

C4 

2 

55  DJ25  RELAY 

14 

D4 

2 

56  DJ33  7444 

14 

1.2.3. 4, 5, 6,8,9  14 

7 

57EC1  RELAY 

14 

AS 

2 

58  EC?  RELAY 

14 

85 

2 

59  EC17  RELAY 

14 

C5 

2 

64  EC25  RELAY 

14 

05 

2 

61EE1  RELAY 

14 

A6 

2 

62  EE?  RELAY 

14 

86 

2 

63  EE17  RELAY 

14 

C6 

2 

64  EE25  RELAY 

14 

D6 

2 

65E01  RELAY 

14 

SPARE 

2 

66EG9  RELAY 

14 

SPARE 

2 

67  EG17  RELAY 

14 

SPARE 

2 

68  E625  RELAY 

14 

S.  ARE 

2 

69EJ1  RELAY 

14 

SPARE 

2 

74EJ9  RELAY 

14 

SPARE 

2 

71  EJ17  RELAY 

14 

SPARE 

2 

72  EJ25  RELAY 

14 

SPARE 

2 

73EB34  2764 

28 

ALL 

1,26,28 

14 

74  CB14  74LS138 

16 

16 

8 

75EE34  6854 

24 

12 

1 

76  FB33  74LS138 

16 

ALL 

16 

8 

77  FB43  74LS138 

16 

ALL 

16 

8 

78  0SE  6844 

28 

ALL 

19 

21 

79  OSE  6844 

28 

ALL 

19 

28 

88  OSE  6844 

28 

ALL 

19 

21 

81  OSE  COWECTCR 

82  OSE  COWECTCR 

83  EJ43  74LS123 

16 

16 

8 

84  OSE  DM9642 

16 

Ml 

16 

8 

85  OSE  DM9642 

16 

ALL 

16 

8 

86  OSE  DM9642 

16 

Ml 

16 

8 

♦12VDC  -I2VX 
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U*  IOC.  TYPE  tPINS  PARTS  USED  +5VDC  GROUND  HVDC  +12VDC  -12VDC 
COi  421  KHz  Clock  Board 
EB1  TIP125  and  D1-D9  (silicon  signal  diodes) 

Sonar  Boards  (A,B,C,D) 

SI  (Reset,  nmnUrj) 

DJ41  RESISTOR  PACK  (5.1  K  ) 

AA13  6  mz  CRYSTAL 
BF47  1.8432  fHz  CRYSTAL 

RESISTOR  PACK  (5.1  K)  (BUTTON  OF  NAV  CPU  BOARD) 

24  POLAROID  SONAR  TRANSDUCERS  (ON  ROBOT  BODY  PAMCLS) 
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APPENDIX  C 


NAVIGATION  COMPUTER  SCHEMATICS 


Appendix  G  contains  the  following  schematic*: 


Fig  Page 

G.l  CPU  ControlBus . G-2 

G.2  CPU  Address  Bus . G-3 

G .3  CPU  Data  . . G-4 

G.4  RAM/ROM  Address  and  Data  Bus.. . . . G-4 

G.5  I/O  Address  and  Data  Bus.... . G-3 

G.6  RAM/ROM  Chip  Enable . . 

G.7  I/O  Chip  Enables . G-7 

G.8  I/O  Auxiliary  Signals . G-8 

G  .  9  ROM  Overlay  RAM  circuit . . 

G.10  Serial  I/O  Ports . G-10 

G.ll  Buffered  Sonar  Signals . G-ll 

G.12  Sonar  Timer/Range  Board  Interface . G-12 

G.13  Sonar  Transducer  Selection  Circuitry  . . . G-13 

G.14  Sonar  Transducer  Relay  Int  erface  . . . .  * . G-14 

G.13  Optical  Shaft  Encoder  Timer/Count er  Circuit . G-15 

G.16  24  Pin  Sonar  Transducer  Header . G-16 

G.17  Dual  Sonar  Range  Board  20  Fin  Header . G-16 

G.18  Optical  Shaft  Encoder  Board  40  Pin  Header . G-17 
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10  Serial  I/O  Porta 
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Sonar  Timer/Range  Board  Interface 
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Fig*  G-13  Sonar  Transducer  Selection  Circuitry 
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75468 
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SONAR 
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172-DIP  BELAY 


The  transmit  line  of  each  SONAR 
board  is  tied  to  eight  relays. 
Each  relay  is  tied  to  one  SONAR 
transducer.  a  shielded  coaxial 
line  is  used  between  each  relay 
and  each  transducer. 


G.14  Sonar  Transducer  Relay  Interface 
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Fig.  G.15  Optical  Shaft  Encoder  Tiner/Couot er  Circuit 
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Fig.  G. 16 
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Header 
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Fig.  G.17  Dual  Sonar  Range  Board  20  Pin  Header 
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Fig.  G.18  Optical  Shaft  Encoder  Board  40  Pin  Header 
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HERO -I  TO  MARRS-1  CONVERSION 


CONTENTS  OF  APPENDIX  H 


FIG.  H.l  DRIVE  COMPUTER  I/O  UPGRADE... 
FIG.  B . 2  MARRS-1  BATTERY  CONFIGURATION 


FIG  H.2  HARRS- 1  BATTERY  CONFIGURATION 
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APPENDIX  J 


AFIT  MOBILE  ROBOTICS  LABORATORY  EQUIPMENT, 
COMPUTER  HARDWARE,  AND  SOFTWARE 

EQUIPMENT 


QUANITY 

1 

2 

1 

2 

3 

2 

1 

1 

1 

2 

1 

2 

2 

1 

1 

1 

1 

1 

1 

2 


DESCRIPTION 
AFIT  MARRS-1  ROBOT 
WORK  BENCH 
SMALL  TABLE 
CHAIR  WITH  WHEELS 
CHAIR 

CHAIR,  HIGH 
TABLE,  FOLDING 
TABLE,  EQUIPMENT 
LAMP,  DESK 
LAMP,  WORK  BENCH 
FAN 

TRASH  CAN 

PAPER  HOLDER,  TYPIST 
HP6236B  POWER  SUPPLY 
BECKMAN  3010  UL  DIGITAL  VOM 
BK  1570 A  OSCILLOSCOPE 
ANDERSON-JACOBSON  MODEM  AD342 
HP  1610A  LOGIC  STATE  ANALYZER 
RACAL-VADIC  VA3414  1200/300  BAUD  MODEM 
STANDING  BOOK  CASE 


J-l 


>^>>>>>>>>> 


COMPUTER  HARDWARE 


MARRS-l  NAVIGATION  COMPUTER 
MARRS-1  DRIVE  COMPUTER 

(MENOS  I  UPGRADE  TO  HERO  COMPUTER  BY  VIRTUAL  DEVICES) 

HEATH  H-S9  COMPUTER 
H-27  8  INCH  DISK  DRIVE  SYSTEM 
TRS  80  COLOR  COMPUTER  (64K  EXTENDED  BASIC) 

5.25  INCH  DISK  DRIVE 
TRS  80  COLOR  MONITOR 
TRS  80  CGP  115  COLOR  GRAPHIC  PRINTER 
TRS  80  MULT I PACK  INTERFACE 
TRS  80  X  PAD  MODEL  0T116 
MOTOROLA  6800  EXORCISER  COMPUTER  SYSTEM 
HEATH  HI 25  DOT  MATRIX  PRINTER 

COMPUTER  SOFTWARE 

WORDSTAR  (EDITOR)  BY  MICROPRO  INTERNATIONAL 
MENOS  I  VAMP  (ROBOT  PROGRAMMING  LANGUAGE  BY  VIRTUAL  DEVICES) 
ROBO  C  (C  CROSS  COMPILER  FOR  HERO  ROBOT  BY  VIRTUAL  DEVICES) 
ROBO  A  (CROSS  ASSEMBLER  FOR  HERO  ROBOT  BY  VIRTUAL  DEVICES) 
MODEM  720  (PUBLIC  DOMAIN  COMMUNICATION  PROGRAM) 

TRS  80  EXTENDED  COLOR  DISK  BASIC 
OS-9  (OPERATING  SYSTEM  FOR  TRS  80  COLOR  COMPUTER) 
BASIC09  (BASIC  RUNNING  UNDER  OS-9) 
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K3  SERIES  KIT  ENCODER  INSTALLATION  INSTRUCTIONS 
(SQUAREKAVE  VERSION) 


1.  MOUNTING  ARRANGEMENT 


Refer  to  Datametrics  Dvg.  B02537  for  Mounting  surface 
arrangement.  Note  that  (2)  14-40  X  .18  deep  tapped  holes  *ra 
called  for.  The  two  tapped  holes  are  used  to  mount  the  kit 
encoder  to  the  motor  surface  with  #4-40  X  S/16  socket  head 
screws. 

Two  #2-S6  X  3/4  pan  head  screws  are  used  to  hold  down  the 
encoder  cover.  These  screws  thread  into  the  encoder  housing  at 
the  places  indicated. 

Note  that  an  alternative  mounting  arrangement  is  possible. 
The  two  <4-40  mounting  screws  may  be  replaced  by  three  #2-S6 
X  S/16  socket  head  screws  located  at  the  positions  indicated  on 
Dwg.  B02537.  In  this  case  note  that  the  two  holes  that  are 
diametrically  opposite  in  the  encoder  housing  will  have  oversize 
clearance  for. #2-56  hardware.  This  clearance  is  reduced  to 
appropriate  site  using  the  two  fibre  shoulder  washers  supplied 
with  the  unit. 

2.  INSTALLATION  PROCEDURE  . 

Step  1-  INSTALL  ROTOR/HUB  ASSEMBLY 

Slide  rotor/hub  assembly  onto  the  shaft.  A  close 
sliding  fit  is  desired.  Excessive  looseness  can  cause 
high  rotor  wobble.  Slide  the  assembly  to  a  position 
which  will  allow  the  rotor  to  enter  the  photohead  gap 
with  safe  clearance  both  above  and  below  the  rotor  disc. 
The  bottom  of  the  disc  surface  will  be  approximately  1/4" 
above  the  encoder  mounting  surface.  Lightly  tighten  one 
hub  set  screw. 

Note  that  the  <4-48  hub  set  screws  are  much  easier 
to  handle  if  the  hex  wrench  is  held  in  a  pin  vise. 

Step  2-  INSTALL  PHOTOHEAD  ASSEMBLY 

Slide  the  photohead  assembly  along  the  motor  mounting 
surface  so  that  the  disc  enters  the  photohead  gap.  Find 
the  mounting  hole  locations  and  drop  in  the  mounting 
screws.  Be  sure  there  is  safe  clearance  above  and  below 
the  disc.  Tighten  down  the  mounting  screws.  Note  that 
the  mounting  hardware  is  easier  to  handle  if  a  ball-tip 
Allen  wrench  is  used. 

Loosen  the  hub  set  screw  and  set  the  working  siT  gap 
using  the  blue  plastic  shim.  Insert  the  shim  along  the 
right  side  of  the  horseshoe  opening  as  the  opening  faces 
you.  Place  the  shim  on  top  of  the  stator  located  on  the 
upper  right  side  of  the  horseshoe  opening. 


Step  3-  ELECTRICAL  CONNECTIONS 
See  Table  1. 

Step  4-  TEST  ENCODER 

Run  the  shaft  at  the  desired  speed  end  functionally 
test  the  encoder.  The  output  signals*  dc  balance 
(symmetry)  and  quadrature  phase  relationship  are 
factory  set  and  should  ordinarily  not  require  adjust- 
aicr.t.  However,  should  finer  trim  be  desired  continue 
as  follows:  Adjustment  pots  are  accessible  on  the 
photohead  printed  circuit  board  which  allow  a  fine  trim 
of  the  symmetry  of  the  output  signals.  See  Figure  2. 

The  phase  relationship  of  the  output  signals  can  be 
changed  by  movement  of  the  photohead  assembly  on  the 
mounting  surface  within  the  range  of  clearance  around 
the  mounting  hardware.  Both  symmetry  and  phase  adjust* 
ments  described  above  can  only  be  achieved  while  observing 
the  output  waveforaig  with  an  oscilliscope.  See  Figure  1. 


CAUTION 

ALWAYS  APPLY  DOWNWARD  PRESSURE  ON  THE  PHOTOHEAD  ASSEMBLY 
WHILE  ATTEMPTING  PHASE  ADJUSTMENT  IN  ORDER  TO  AVOID 
RUBBING  THE  DISC  AGAINST  THE  STATOR. 


CHANNEL 

'•A*' 


CHANNEL 


••g" 


CHANNEL 


TRIMPOTS  (A  (  B)  CONTROL 
SQUAREWAVE  DUTY  CYCLE 


TRIMPOT  "M"  CONTROLS 
PULSE  WIDTH 


Figure  1  -  Waveform  Characteristics 
(CCK  rotation  viewed  from  encoder  end) 


Channel  *a*  trim  rot 


Figure  2  -  Photohead  Board 
Pot  Layout 

.NOTE:  The  trix  pots  are  factory  set  and  glyptolled.  They  ordin- 
airily  should  not  require  re-adjustnent. 


Step  5  -  INSTALL  COVER 

Install  cover  over  encoder  using  (2)  #2-56  screws 
provided. . ~Do  not  over  tighten  cover  screws. 


Table  1  -  Electrical  Connections 

Wire  •  Function 

Color 


Yellow 

Blue 

Orange 

Red 

Black 


Output  A 
Output  B 
Output  M 
♦V 

Ground 
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POLAROID  ULTRASONIC  RANGING  SYSTEM 


Unmodified  Ranging  Circuit  Board  *606191 
Modified  Ranging  Circuit  Board  *606745 

TECHNICAL  OATA 


General  Description: 

The  ranging  modules  contains  all  necessary  components  to:  generate  the  drive  signal  for  the 
transducer;  control  timing  functions;  receive,  amplify  and  filter  the  returned  echo:  and  process 
this  signal  providing  a  step  function  output  at  the  time  of  the  received  echo.  The  distance  from 
the  transducer  to  the  target  can  then  be  computed  with  additional  circuitry,  knowing  the  speed 
of  sound  in  air  (or  other  gas),  and  the  time  interval  between  the  transmit  signal  and  the  received 
echo  as  provided  by  the  ranging  module. 

The  #606745  board  supplied  with  the  designer's  kit  consists  of  a  #606191  board  which  has  had  a 
six-wire,  ribbon  cable  attached  as  shown  on  Figure  2  and  has  been  modified  as  shown  on 
Figures  4  and  5.  The  #606745  board  does  not  have  the  transducer  cable  attached;  however,  this 
cable  can  be  purchased  from  Polaroid  by  requesting  Cable  Assembly  #604789. 

Features: 

Measurement  range  of  0.9  feet  to  35  feet 

5T  Nominal  resolution  ♦  0.12  inches  to  10  feet 

±1%  over  entire  range 

Multiple  measurement  capability 

Drives  Polaroid  Eiectrostatic  Transducer  which  requires  50kHz  300V  signal  with  no  additional 
interface. 

Designed  to  operate  with  the  Polaroid  Instrument  Grade  Electrostatic  Transducer  #Co4l42. 
Operation  Conditions: 

Supply  Voltage  5.0  Vdc 

Continuous  Operating  Current  250  mAmp 

Peak  Current  During  Transmit  2.5  Amp 

Temperature  Range  0  to  40  Deg.  C. 


Unmodified  Ranging  Circuit  Board  #606191 
Modified  Ranging  Circuit  Board  #606745 

Schematic: 


FIG.  1 


interconnect  Diagram: 


FIG  2 


Unmodified  Ranging  Circuit  8oard  #606191 
Modified  Ranging  Circuit  Board  #606745 

Signal  Description: 


NAME 

DESCRIPTION 

Wire  Color 

On  «606745 

VCC 

Positive.  Power  Supply 

Yellow  &  Orange 

VSW 

Starts  a  transmit.'receive  cycle  when  taken  high 

Resets  for  next  cycle  when  taken  low 

Red 

XLOG 

Transmit  de’ect,  use  first  falling  edge  after  VSW  high 

Blue 

mflog 

Receiver  detect,  goes  low  when  an  echo  is  detected 

Green 

GND 

Ground,  power  supply 

Brown 

XDUCER 

Transducer  input 

— 

GND 

Transducer  ground 

— 

Electrical  Characteristics: 


PARAMETER 

MIN. 

!  TYP. 

MAX. 

UNITS 

Supply  Voltage 

mm 

68 

Vdc 

Continuous  Operating  Current 

250 

mAmp 

Peak  Current  (during  transmit) 

2.5 

Amp 

VSW 

Vih 

4.0 

VCC 

Vdc 

lih 

109 

mA 

Vil 

0.4 

Vdc 

XLOG 

Voh 

2.0 

Vdc 

Vol 

0.8 

Vdc 

»0l 

0.5 

mA 

mflog 

Voh 

2.0 

Vdc 

Vol 

0.8 

Vdc 

lol 

1.0 

mA 

L-3 


Unmodified  Ranging  Circuit  Board  #606191 
Modified  Ranging  Circuit  Board  #606745 

Timing: 


pow  er 

IVSWI 


TRANSMISSION 
lx  LOG) 


1  m» 


DETECTED  - 
ECHO (MFlOG) 


ECHO  TIME 
TO  FIRST  ECHO 


J 


PIN  S 
OF 
U1 

AMPLIFIED  ECHO 


(DISTANCE  INFORMATION) 


V -*  111 


1ST  ECHO 


SUBSEQUENT 

ECHO'S 


PIN  9 

U1 

PROCESSED  ECHO 


Unmodified  Ranging  Circuit  Board  #606191 
Modified  Ranging  Circuit  Board  #606745 

Typical  Relative  Gain  Bandwidth: 


38.0  67. s 


.  i  \T  '.  V  x7" 


Unmodified  Ranging  Circuit  Board  #606191 
Modified  Ranging  Circuit  Board  #606745 

Parti  Lilt: 


ITEM 

REF. 

DESCRIPTION 

1 

P  C.  BOARD 

2 

C3 

CAPACITOR  1m/.  35V 

3 

02 

TRANSISTOR 

4 

U3 

POWER  1C 

5 

R9 

RES.  150  n 

6 

U2 

DIGITAL  1C 

7 

C4 

CAPACITOR  .001  nf,  10V 

8 

U1 

ANALOG  1C 

9 

Cl 

CAPACITOR  .01  Mf.  10V 

10 

LI 

TUNED  CIRCUIT  INDUCTOR 

11 

C2 

CAPACITOR  .OW.  10V 

12 

R4 

RESISTOR  (62K,  5%,  V,\N) 

13 

R6 

VARIABLE  RESISTOR  (25K,  14 W) 
(See  Note  2) 

14 

C5 

CAPACITOR  .0022 m/.  400V 

15 

T1 

TRANSFORMER 

16 

R1 

RESISTOR  (1-10K,  5%,  ’/.W) 

See  Note  (1) 

17 

CR1 

DIODE  ZENER  (IN4006) 

18 

CR2 

DIODE  ZENER  (IN4006) 

19 

R2 

RESISTOR  (130K,  5%.  V*W) 

20 

CIO 

CAPACITOR  .01m/  10V 

See  Note  (2) 

21 

XTAL 

CRYSTAL  420  kHz 

22 

SI 

SWITCH 

23 

01 

TRANSISTOR 

NOTE:  1.  Resistor  Value  Set  at  Factory 
NOTE:  2.  Only  Added  If  Necessary  at  Factory 


Unmodified  Ranging  Circuit  Board  *606191 
Modified  Ranging  Circuit  Board  *606745 


Dimensions 


SIZE  MAX  OIM. 

3  025  IN.  X  1.652  IN. 
X  0  520  IN. 


Application  Notes: 


The  ranging  modules  *606191  and  *606745  are  designed  to  function  with  the  Polaroid 
Instrument  Grade  Transducer  *604142. 


Power  the  module  through  VCC.  Next  bring  VSW  high.  The  transmit  burst  of  56  pulses  will 
begin  approximately  5  msec  later.  The  56  pulses  consist  of  8  cycles  at  60  kHz.  8  cycles  at  56  kHz, 
16  cycles  at  52.5  kHz  and  24  cycles  at  49.41  kHz  and  lasts  for  a  period  of  about  1.0  msec. 
Detected  transmit  can  be  observed  at  U2-12.  The  receiver  is  blanked  for  1 .6  msec.  If  an  echo  le 
not  detected  within  62.5  msec  MFLOG  will  go  high.  Also  if  an  echo  is  detected  before62.5  msec 
and  after  1.6  msec  MFLOG  will  go  hich. 

Range  information  is  determined  by  th  j  time  interval  between  the  first  falling  edge  of  XLOG  and 
the  falling  edge  of  MFLOG.  The  speed  of  sound  in  air  is: 


C  =  331.4  1/  -  1-—  M/3ec 
)  273 

C  =  Speed  of  sound  in  air 
T  =  Temperature  in  degree  Kelvin 
(Kelvin  =  Celsius  ♦  273) 

M  =  Meters 


Sec  =  Seconds 

To  initiate  another  range  measurement  bring  VSW  low  then  high  again  while  leaving  VCC  on. 

The  system  (transducer  and  ranging  module)  gain  is  set  to  detect  a  1 .34  inch  diametersphereat 
4  feet  3  inches  on  the  acoustic  axis. 


If  the  ranging  circuit  board  contains  R6,  adjustments  are  not  recommended.  R6  can  change 
system  gain  and  will  change  these  specifications.  If  R6  is  needed,  refer  to  the  parts  list  for 
installation  location  and  specification.  C2  will  have  to  be  relocated  to  the  unused  pad 
connected  to  the  R6  wiper. 
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Unmodified  Ranging  Circuit  Board  #606191 
Modified  Ranging  Circuit  Board  #606745 

Modification#: 

The  Ultrasonic  Circuit  Board  (#606745)  included  with  the  Ultrasonic  Designer's  Kit  has  been 
modified  for  use  in  ranging  applications.  Module  #606191,  ordered  separately,  will  have  to  be 
modified  by  the  purchaser  to  achieve  the  same  performance.  Other  changes  could  be 
r  ecessary  for  a  particular  application.  Refer  to  the  figure  below  to  see  how  the  ranging  module 
#606191  must  be  altered  to  obtain  performance  similar  to  that  of  module  #606745  in  the  kit. 
Make  the  alterations  as  follows: 


FIG.  4 


A.  Cut  the  metallic  circuit  path  on  the  board  at  the  two  points  indicated  by  the  arrows.  Scrape 
the  metal  away  or  use  any  other  effective  method. 


B.  Solder  1  jumper  wire  to  the  board  as  shown:  between  points  A  and  A'. 


C.  Cut  switch  as  shown. 


FIG.  5 


For  additional  Information  or  technical  assistance  contact : 

Spec'ficttions  Subject 

Polaroid  Corporation  to  cnenge  without  Notice 

Battery  Division 

784  Memorial  Drive  *  4A 

Cambridge,  Massachusetts  02139  bd-263  "Polaroid"  end -Poiapuise'-# 

(617)  577-4681  Printed  m  U  S  A  7/83 
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Appendix  M 


6800  Hex  Fife  Format 


The  6800  Hex  file  format  provides  a  com* 
pact  representation  of  binary  data  patterns  for 
transmission  using  ASCII  communication  termi¬ 
nals. 

The  Hex  fileis  organized  into  data  records  with 
each  record  containing  information  in  the  same 
format.  The  record  information  consists  of  type, 
length,  address,  data  and  checksum.  All  records 
begin  with  an  'S’  character  for  start  of  record 
identification.  All  information  In  the  file  which 
is  not  between  a  start  of  record  and  the  checksum 
is  ignored. 


TAPE  FORMAT 
ASCII 

Character  Description 


1 

2 


3-4 


5, 6, 7,8 

9, ....  N 

N+l.N+2 


Start  of  record  (S) 

Type  of  record 
0  —  Header  record 
1  —  Data  record/ 

9  —  End  of  file  record , 

Byte  Count 

Since  each  data  byte  h  repre¬ 
sented  as  two  hex  characters,  the 
byte  count  must  be  multiplied 
by  two  to  get  the  number  of 
characters  to  the  end  of  the 
record.  (This  includes  checksum 
and  address  data.) 

Address  Value 

The  memory  location  where  this 
record  is  to  be  stored. 

Data 

Each  data  byte  is  represented  by 
two  hex  characters. 

Checksum 

The  one's  complement  of  the  ad¬ 


ditive  summation  (without  carry) 
of  the  data  bytes,  the  address, 
and  the  byte  count. 

Example  Data  Record 


Memory  Contents 
Address  Data 

A 000  10 

A001  1A 

A 002  20 

A 003  2A 

Data  Record  Contents 


Character 

Tape 

1  Start  of  record 

53 

S 

2  Type  of  record 

31 

1 

3  Byte  count 

30 

0 

4 

37 

7 

5 

41 

A 

6 

30 

0 

7  Address 

30 

0 

8 

30 

0 

9  Data  byte  1 

31 

1 

10 

30 

0 

11  Data  byte  2 

31 

1 

12 

41 

A 

13  Data  byte  3 

32 

2 

14 

30 

0 

15  Data  byte  4 

32 

2 

16 

41 

A 

17  Checksum 

38 

8 

18 

34 

4 

M-l 


The  form  \t  for  all  hex-file  records  is  di 


Character 


Header 

Record 


1 

Start  of  Record 

2 

Type  of  Record 

3 

4 

Byte  Count 

6 

6 

7 

Address 
(if  any) 

8 

9 

Data 

10 

N  Checksum 


63 

30 

31 

32 
30 
30 
30 
30 
34 
88 
34 

34 

35 
82 


39 

45 


below. 


30 

82 

t 


41 

48 


02 


A8  (Checksum) 


Data 

End-of-File 

Record 

Record 

S 

S3 

S 

53 

S 

0 

31 

1 

39 

9 

12 

31 

36 

16 

30 

03 

33 

SB 

EB 

I 

E9 

1100 

n 

0000 

30 

30 

30 

30 

39 

38 

98 

H 

FC 

El 

(Checksum) 
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NAVIGATION  C&fUTtf  SCFTWRE  USERS  MANUAL 

( EXTRACTED  IN  PART  FROM  AMERICAN  MICROSYSTEMS  6000  PROTOTYPING  MANUAL.) 


M  NAVIGATION  COfVTER  SCFTWttE  IS  COIfRISO  OF 
THE  M1KBUG  AND  PROTO  OPERATING  SYSTEMS,  A  RON 
SUBR0UTI1C  LIBRARY  (RS)3,  A  SYSTEM  HARDWARE 
INITIALIZER,  AND  A  SYSTEM  MASKABLE  INTERRUPT  HANDLER. 
niKBUG  IS  SELDOM  USED  EXCEPT  BY  SPECIAL  KfERClAL 
~FTWARE  SUCH  AS  BASIC  INTERPRETERS.  TIC  PROTO 
OPERATING  SYSTEM  RESPONDS  TO  TIC  COMMANDS  DESCRIBED  IN 
TIE  FOLLOWING  PARAGRAPHS.  A  CtWIAND  CONSISTS  OF  A  OC 
CHARACTER  COMMAND  IDENTIFIER  FOLLOWED  BY  ADDITIONAL 
PARAMETERS  IF  NEEDED,  SEPERATED  BY  BUMS  OR  COMS. 
ALL  COMMANDS  END  WITH  A  CARRIAGE  RETURN.  SINCE  NO 
ACTION  IS  TAKEN  BEFORE  TIC  CARRIAGE  RETURN,  AND  IWVT 
LUC  NAY  EE  DELETED  BY  USE  OF  TIC  ESCtfE  KEY.  (PAPER 
TAPE  AS  A  STORAGE  MEDIA  IS  fCNTIOO  IN  TIC  FOLLOWING 
PARAGRAPHS.  IT  SHOLLD  BE  INTERPRETED  AS  THE  DEVICE  OR 
MEDIA  WHICH  IS  USED  TO  STORE  AND  RETR1VE  DATA  IN  THE 
ROBOT  TO  EXTERNAL  CWFUTER  SYSTEM.) 


L,  ADDL,  ADDH,  OFFSET 

The  Load  file  command  loads  data  from  a  hex 
formatted  file,  (see  Appendix M  )  into  the  user’* 
memory  between  ADDL  and  ADDH,  inclusive.  'I’he 
OFFSET  is  added  to  the  memory  address  specified 
on  the  tape  to  form  the  actual  memory  starting 
address  for  the  data  stored.  If  a  byte  to  be  stored 
into  memory  has  an  address  outside  of  the  range 
ADDL,  ADDH,  it  is  not  entered  into  memory,  but 
a  Delete  character  (H’FF)  is  transmitted  to  the 
terminal. 

Example:  L  0100  02FF  FFFA 

Tna  address  range  in  the  L  command  is  optional, 
and  if  omitted  ,  is  assumed  to  be  the  full  range  of 
memory  (0000— FFFF).  The  offset  parameter  is 
also  optional,  and  if  omitted  is  assumed  to  be  zero 
(0000).  Thus  the  L  command  v.*ith  no  parameters 
loads  the  tape  into  the  memory  locations  specifier? 
on  the  tape  with  no  offset.  The  offset  value  in  the 
L  command  is  a  two’s  complement  signed  number, 
entered  in  unsigned  hexadecimal.  For  example,  an 
offset  of  -6  is  entered  as  FFFA. 


If  an  attempt  is  made  to  load  non-existent  memory, 
or  ROM,  the  loading  operation  will  terminate, 
typing  out  the  address  and  the  message  “BAD 
ADR”. 

In  operating  the  Load  command,  PROTO  goes 
into  a  receive  mdand  scans  thefile  for  the 
first  ASCII  "S",  which  indicates  start  of  record. 
It  is  not  necessary  to  position  the  fileat  the  first 
record  of  a  file  since  each  record  contains 
its  own  starting  address. 

PROTO  will  load  data  records  until  it  encounters 
an  end  of  file  (EOF)  record  or  »fiie error  (Check 
Sum  or  illegal  character).  When  PROTO  reads  a 
header  record  (start  of  record  and  address),  it 
translates  the  header  into  ASCII  characters  and 
prints  the  result.  The  Check  Sum  is  the  binary 
sum  of  all  characters  in  the  block. 

PROTO  does  not  list  thefile  contents  as  the  file 
is  being  read. 

When  PROTO  encounters  an  end  of  file  record 
or  a  file  error,  it  turns  off  the  reader  and  prints 
“EOF”  or  “CKSM  ERR"  respectively. 

ADDL,  ADDH,  OFFSET 

The  Put  hex  file  command  causes  PROTO 
to  create  a  hex  file  of  the  contents  of 
memory  between  ADDL  and  ADDH,  inclusive. 
Each  record  is  created  with  a  four-digit  hex 
address  of  the  starting  byte  of  the  record.  This  ad¬ 
dress  is  derived  from  the  memory  address  of  the 
byte  being  filed  ,  plus  the  offset  value,  OFF* 
SET.  The  offset  is  optional,  and  if  omitted  is  as¬ 
sumed  to  be  zero. 


Records  using  this  command  (except  the  last 
record)  contain  16  bytes  of  data  plus  the  start 
code,  byte  count,  address,  and  the  checksum. 

The  P  command  does  not  cause  an  EOF  record 
to  be  created  so  that  several  disjoint  blocks 
of  memory  can  be  combined  into  one  file. 

Example:  P  F000  F07F  0F00 


S,  ADDR,  BYTEl,  BHE2, - ,  BYTEN 

The  get  memory  command  writes  the  8-bit  data 
words  specified  by  BYTE1  to  BYTEN  into  con¬ 
secutive  memory  locations  starting  at  ADD. 

If  ADD  has  more  than  4  (hexadecimal)  characters 
or  if  any  of  the  data  bytes  have  more  than  2 
characters  each,  only  the  last  4  or  2  characters  are 
used  respectively. 

Example:  S  0000  86  05  97  28 

Memory  locations  at  0000  thru  0003  are  loaded 
as  shown. 


D,  ADDL,  ADDH 

The  Display  memory  command  prints  the  contents 
of  memory  between  ADDL  and  ADDH,  inclusive, 
in  hex  format.  Up  to  sixteen  bytes  per  line  are 
printed,  preceded  by  the  hexadecimal  address  of 
the  first  byte  of  the  line. 


C 

Gj  ADDR 

The  Go  command  starts  execution  'of  the  user 
program  at  the  address  tpecified  by  the  input 
parameter.  To  insure  that  all  registers  contain  the 
same  information  they  held  before  the  user  pro¬ 
gram  was  interrupted,  PROTO  pushes  into  the 
stack  the  copy  of  the  user  registers  that  it  keeps 
at  locations  bfea-bff2  (  CC,  B,  A,  X,  P,  S)  then 
executes  an  RTI  instruction.  The  user  can  change 

the  initial  values  of  the  registers  by  changing  the 
contents  of  these  locations. 

Example:  G  300 

Program  will  branch  to  address  0300  and  start 
execution  from  that  point. 


£ 

The  Registers  command  prints  the  contents  of 
memory  locations b*t.a-bff2  which  contain 
the  values  that  were  in  the  user's  C,  B.  A,  X,  P,  and 
S  registers  (in  that  order)  when  the  user’s  program 
was  last  interrupted. 


M,  ADDL,  ADDH,  DEST 

The  Jriove  command  copies  memory  from  the 
range  ADDL  —  ADDH,  inclusive,  to  the  RAM  loca¬ 
tions  starting  at  DEST.  This  copy  begins  at  the 
lower  address,  so  if  DEST  lies  within  the  range 
ADDL  ~  ADDH,  some  of  the  original  data  will  be 
lost,  and  other  parts  will  be  duplicated. 


£ 

The  End  of  Transmission  command  is  used  to 
cause  an  EOT  character  to  be  punched  on  the 
paper  tape.  After  a  field  has  been  punched,  an  EOT 
will  terminate  the  record  and  punch  a  trailer  tape. 
When  reading  a  record,  the  reader  will  stop  at  the 

EOT  character.  If  do  EOT  character  *s  present, 
the  reader  must  be  manually  turned  off  and  the 
Reset  switch  must  be  pressed  to  enter  the  operating 
system  program. 


£ 

£•14  tUrt  «t  address  I1MH  in  the  systta. 
Present*!  this  his  the  effect  of  executing  the 
extended  interrupt  handler  th*t  ms  leeded  into 
RAN  froi  RON  during  gover-up.  DtU  froe  the 
optical  shsft  encoders  and  the  four  sor*ar  rang* 
hoards  arc  sent  thru  the  terninal  serial  port  if 
the  navigation  coeputer  to  whatever  device  is 
connected  to  it  at  9&M  baud.  (The  extended 
interrupt  handler,  when  active,  will  respond  to 
the  following  coMindsi 

Control  S  Stop  sending  data. 

Control  Q  Resuee  sending  data. 

Control  C  Restart  Nav  coeputer. 

1  Select  sonars  1  at  a  tiee.  2 

Select  sonars  2  at  a  tiM.  2  Select 

sonars  3  at  a  tiM.  4  Select  sonars 

4  at  a  tiM.)  If  the  RON  located  at  U7  is  replaced 
with  a  RON  containing  a  68W  BASIC  interpreter 
then  a  cold  start  ef  BASIC  is  eade. 


¥ 

{lire  start  at  address  BK3H  in  the  sgstee.  This 
coeeand  is  onlg  effective  if  the  RON  located  at  V7 
is  replaced  with  a  RON  containing  a  69M  BASIC 
interpreter.  However,  PROTO  will  juwp  to  address 
41B3H  ang  tiM  this  cowMnd  is  given  irreguardless 
of  the  contents  of  that  location. 


Q 

Odyssey  contend.  Causes  PROTO  to  junp  to  address 
I2M1H  in  the  systen. 

INTERRUPTS 

Of  the  four  available  interrupt  vectors, 
RESET  and  SWI  are  used  by  PROTO.  IRQ  is  used 
by  the  Sonar/Optical  Shaft  Encoder/Tic  TiM 
systen.  ffll  is  not  used  and  is  available  for 
future  designs.  All  interrupt  vectors  are  in 
RAN  except  RESET  so  that  a  progran  can 
reconfigure  the  interrupt  structure.  A 
hardware  RESET  always  returns  the  user  to  the 
PROTO  operating  systen  after  a  hardMre 
initialization  and  RON  to  RAH  overlay  has 
been  perforMd. 


The  upper  memory  locations  are  rom.  If  the  user 
expects  either  KM!  or  IRQ  interrupts  to  occur,  he 
may  reinitialize  the  vector  addresses  to  the  starting 
.  address  of  hi4RQ  and  NMI  handler  routines. by 
changing  addresses  BFF7-BFFF. 

PROTO  must  have  control  of  the  RESET  vector  so 
that  the  RESET  switch  on  the  Prototyping  Board 
can  return  program  control  to  PROTO  at  any  time. 

The  reset  routine  copies  the  contents  of  the  B.  A, 
X,  CC,  and  S  registers  into  a  fixed  area  of  memory. 
This  means  that  the  program  can  be  aborted  at  any 
time  by  using  the  reset  switch  while  still  saving  all 
the  registers  except  the  program  counter.  Unfor¬ 
tunately,  the  contents  of  the  program  counter  are 
lost. 

It  is  possible  for  the  user  to  use  the  NMI  interrupt 
to  abort  a  program  execution  without  losing  the 
contents  of  the  P  and  C  registers.  This  condition  is 
automatically  set  in  the  NMI  handling  routine 
when  PROTO  is  called.  This  interrupt  vector  will 
cause  the  contents  of  the  user’s  registers  to  be 
printed  when  the  NMI  lines  goes  low. 

Since  the  SWI  instruction  is  used  to  call  sub¬ 
routines  between  00  and  H’18  from  (RS)  *  as 
described  uter  in  “The  Subroutine  ROM”, 
the  user  is  somewhat  limited  in  the  ways  he  can  use 
SWI  instructions.  However,  he  can  access  an  SWI 
handler  routine  in  his  own  program  by  an  SWI 
instruction  followed  by  a  byte  containing  the 
decimal  number  less  than  H'80  but  greater  than 
H'19  <  n  <  H'80  sequence,  PROTO  passes  control 
at  address  bff  3.  If  the  user  expects  to  access  his 
own  SWI  routine  and  use  PROTO,  be  must  use  the 
Set  Memory  command  to  store  the  address  of  this 
routine  at  location!  BFF3  and  BFF4. 

PROTO  makes  sure  that  the  user’s  SWI  routine  is 
entered  from  the  stack  with  all  registers  containing 
the  same  information  that  they  would  hold  if  the 
routine  were  entered  directly  through  the  SWI 
vector. 


BREAKPOINTS 


EXTENDED  INTERRUPT  HANDLER 

The  extended  interrupt  handler  that  vat 
leaded  intv  RAH  fro*  ROM  during  povtr-up  send* 
data  frev  the  optical  shaft  encoders  and  the  four 
sonar  range  boards  thru  the  terainal  serial  port 
of  the  navigation  conputer  to  vhatever  device  is 
connected  to  it  at  9&M  baud.  The  extended 
interrupt  handler  becovet  active  uhen  the  (old 
coniand  is  given  frev  PROTO.The  Nav  computer  Mill 
then  respond  to  the  folloMing  coanands  ONLYi 
Control  S  Stop  sending  data. 

Control  Q  Resume  sending  data. 

Control  C  Restart  Nav  computer, 

i  Select  sonars  1  at  a  time.  2 


Select  loners  2  et  a  tiae.  3 

Select 

sonars  3  at  a  tine.  4 

Select  senars 

4  at  a  tint. 

THE  SUBROUTINE  ROM 

Many  of  the  monitor's  functions  are  accomplished 
with  the  help  of  the  Re-Entrant  Self-Relative 
Subroutine  ROMs  (RS)* .  This  standard  ROM, 
which  can  be  considered  a  software  extension  to 
the  6800  instruction  set,  is  also  available  to  be  used 
by  the  user  both  on  the  prototype  board  and  in  his 
final  production  system.  The  user  can  call  one  of 
the  25  (RSf  subroutines  with  an  SWI  instruction 
followed  by  tbe  number  of  the  desired  subroutine. 
The  details  of  the  subroutines  available  In  the 
(RSJ*  user's  manual. 

The  user  should  be  aware  of  the  fact  that  the 
(RSJ*  pushes  from  7  to  10  bytes  of  data  onto  the 
stack,  depending  upon  which  subroutines  are  called. 
This  means  that  if  the  urer  calls  (RS)5  routines,  he 
must  make  sure  that  the  necessary  memory  space  is 
available  for  stack  expansion. 

Since  PROTO  assigns  its  own  stack  area,  the  user 
need  not  be  concerned  about  bow  (RS)1  is  used. 


Breakpoints  allow  the  user  to  halt  his  program  and 
examine  the  contents  of  the  internal  registers. 
PROTO  provides  two  types  of  breakpoints.  In  this 
system,  breakpoints  are  actually  debugging  routines 
that  can  he  called  from  the  user’s  program  just  like 
(RS)4  routines. 


Each  breakpoint  requires  a  two  byte  calling 
aequence:  an  SWI  instruction  followed  by  a  number. 

Breakpoints  may  be  inserted  either  by  reassembling 
the  program  with  the  extra  SWI  instructions  added 
the  Set  Memory  command  may  be  used  to  replace 
parts  of  the  code  with  SWI  instructions.  Note  that 
the  second  method  is  not  satisfactory  for  the  snap¬ 
shot  option  (described  below)  since  the  replaced 
code  must  be  restored  before  execution  can  be 
continued.  When  using  the  second  method,  the  user 
must  make  sure  that  he  replaces  the  first  two  bytes 
of  an  instruction.  If  the  SWI  replaces  the  second  or 
third  byte  of  an  instruction,  it  may  be  interpreted 
as  an  address  rather  than  an  opcode. 

The  different  types  of  breakpoints  are: 

1.  Print  registers  (SWI,  H'80) 

2.  Snapshot  (SWI,  H'81) 

The  sequence  SWI,  H’80  saves  the  user  ’s  registers  at 
the  sector  stored  in  BFF1-BFF2  ,  prints  their 
contents  (in  the  order  CC  BB  AA  XXXX  PPPP 
SSSS),  then  returns  control  to  PROTO. 

The  sequence  SWI,  H'81  prints  out  the  contents  of 
the  user’s  registers  then  continues  executing  the 
user’s  program  starting  at  the  address  following  the 
byte  containing  the  number  H‘81.  Note  that  if  this 
address  does  not  contain  a  valid  opcode,  unpredict¬ 
able  results  will  occur. 
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Reentrant  Self-Re’ative 
ibroutinc  ROMs  (RSRSRS)=(RS)’ 


The  cost  of  microprocessor  software  development 
is  many  small  items'  the  cost  of  assembly  time, 
storage  time,  transmission  time,  loading  time, 
design,  development,  documentation  and  debug. 
The  cost  of  many  of  these  items  continues  to  ac- 
cumulate  even  though  a  subroutine  library  exists 
for  common  functions,  in  particular  the  time  and 
cost  of  transmission,  loading  and  ROM  pattern 
generation. 

The  purpose  of  Reentrant  Self-Relative  Subroutine 
ROMs  (RS)3  is  to  give  the  user  a  hardware  subrou- 
tine  package  which  exists  in  the  breadboard  design 
from  the  beginning.  The  programs  are  documented, 
debugged  and  constitute  some  of  the  most  com¬ 
monly  performed  subroutines  that  assembly  lan¬ 
guage  programmers  generate.  The  subroutines  are 
not  complex  and  are  not  intended  to  be.  Any  sub¬ 
routine  could  easily  be  reproduced  by  a  user;  how¬ 
ever,  the  intention  is  that  the  routine  e*kts  now 
and  the  user  does  not  have  to  reproduce  it.  The 
routines  tend  to  be  slow  because  of  their  generality 
but  the  intention  is  immediate  availability.  If  a 
particular  program  is  time  critical,  it  can  be  regen¬ 
erated  later  when  the  time  critical  element*  are 
known 


CONCEITS 

The  (RS)®  uses  a  number  of  concepts  to  allow  flex¬ 
ibility  in  the  user  environment.  The  first  concept  is 
self-relative  programming.  This  simply  means  that 
the  program  will  function  correctly  regardless  of 
where  it  is  located  in  memory.  The  user  will  need 
to  know  where  it  is  located  so  he  can  reference  it. 
However,  this  actual  location  will  only  have  to  be 
recorded  once.  The  self-relative  program  uses  rela¬ 
tive  address  instructions  for  program  control  and 
vhe  index  and  stack  pointer  instructions  for  data 
manipulation. 


The  stack  is  used  for  temporary  storage  of  data  to 
prevent  (RS)3  from  being  tied  to  fixed  addresses. 
This  allows  the  program  to  be  reentrant;  i.e.  the 
program  can  be  called  at  different  times  without 
completing  the  previous  call.  This  means  that  the 
same  routine  can  be  called  by  the  interrupt  proces¬ 
sor  as  well  as  by  the  program  which  was  inter¬ 
rupted.  The  concept  of  reentrant  code  is  not  to  be 
confused  with  recursive  code;  even  through  recur¬ 
sive  coding  could  have  been  used  in  the  subroutine 
package,  it  is  not. 

The  subroutine  calling  mechanism  uses  the  SW1 
instruction  followed  by  a  single  byte  index  for  the 
particular  subroutine  invoked.  This  was  chosen 
because  the  SW1  is  the  most  convenient  from  an 
internal  programming  viewpoint  and  the  safest.  It 
is  safe  because  an  error  in  a  ROM  can  be  cor¬ 
rected  by  replacing  the  subroutine  ROM  without 
altering  any  other  user  ROM.  If  direct  addresses  to 
subroutine  code  exist  in  the  user's  domain,  his 
ROMs  would  change  if  the  location  of  the  routine 
in  the  (RS)3  changed. 


IMPLEMENTATION 

The  user  places  the  base  address  of  the  (RS)3  into 
the  SWI  vector  address.  Each  SWI  instruction  re¬ 
quires  an  index  byte  to  follow  the  SWI  instruction 
where  the  index  indicates  the  function  to  be  exe¬ 
cuted.  After  the  function  is  performed,  the  user 
program  will  continue  with  the  instruction  followr- 
ing  the  index  byte.  In  essence,  a  whole  new  cet  of 
instructions  have  been  created  for  the  user  which 
are  two  bytes  long. 

To  make  the  entry  easier,  a  macro  call  can  be  pro¬ 
vided  which  will  assemble  the  correct  index  byte 
when  the  function  Dame  is  used.  A  set  of  EQU 
assembler  commands  associates  the  name  and  the 
index  byte  value. 


*3 


(RS)3  IN  PROTO  -  SUBROUTINE 
DESCRIPTIONS 

Each  of  the  subroutines  in  the  ROM  are  described 
here,  giving  the  index  for  the  call,  a  mnemonic  sub¬ 
routine  name,  a  descriptive  title,  and  the  number 
of  bytes  in  the  stack  used  by  the  call  (including  the 
SW1).  A  brief  description  of  the  subroutine  opera¬ 
tion  is  also  given,  with  the  entry  requirements,  the 
exit  conditions,  and  the  registers  altered  by  the 
subroutine.  Only  those  registers  indicated  are 
altered  by  any  (itS)3  subroutine. 


Stack 

Index  Name _ Title _ Bytes 

00  PUSH  ALL  Push  All  Registers  14 

Five  bytes  are  pushed  onto  the  stack,  containing, 
respectively,  the  Condition  Codes,  the  B  and  A 
accumulators,  and  the  Index  Register.  No  registers 
are  altered  (except  the  stack  pointer,  which  is 
decremented  by  5). 

Entry:  Any 

Exit:  Stack:  SP  +1  +2  +3  +4  +5  (-old  SP) 

CC,  B.A.XHXL 

Registers  Altered:  SP 

01  POPALL  Pop  (-Pull)  All  Registers  9 

Five  bytes  are  pulled  from  the  stack  into  the  Con¬ 
dition  Codes,  the  B  and  A  accumulators,  and  the 
Index  register,  respectively.  The  Stack  Pointer  is 
incremented  by  5. 

Entry:  Stack,  as  by  PUSH  ALL 
Exit:  CC,  B,  A,  X  pulled  from  stack 
Registers  Altered:  CC,  B,  A,  X,  SP 

02  ,  TXAB  Transfer  Index  Register  9 

to  A  and  B 

The  most  significant  eight  bits  of  the  index  register 
are  copied  to  the  A  accumulator,  and  the  least 
significant  eight  bits  are  copied  to  the  B  accumu¬ 
lator. 

Entry:  Any 

Exit:  A,  B  loaded  from  X 
Registers  Altered:  A,  B 


SUck 

Index  Name  Title _ Bytes 

03  TABX  Transfer  A  and  B  to  9 

Index 

Accumulator  A  is  copied  to  the  most  significant 
byte  position  of  the  index  register,  and  accumula¬ 
tor  B  is  copied  to  the  least  significant  byte  position 
of  the  index  register. 

Entry:  Any 

Exit:  X  loaded  from  A,  B 
Registers  Altered:  X 

04  XABX  Exchange  A  and  B  with  \2 

Index 

The  contents  of  the  Index  register  and  the  two 
accumulators  are  exchanged,  A  with  the  most  signi¬ 
ficant  byte  of  X,  B  with  the  least  significant  byte. 

Entry:  Any 

Ex_t:  A,  B  and  X  exchanged 
Registers  Altered:  A,  B,  X 

05  PUSHX  Push  Index  Register  11 

The  contents  of  the  index  register  is  pushed  onto 
the  stack.  The  Stack  Pointer  is  decremented  by 
two. 

Entry:  Any 

Exit:  SUck:  SP  +1  +2  (-old  SP) 

XH  XL 

Registers  Altered:  SP 

06  PULLX  Pop  (-Pull)  Index  9 

Register  from  SUck 

Two  bytes  are  pulled  from  the  sUck  into  the  index 
register,  and  stack  pointer  is  incremented  by 
two. 

Entry:  Two  bytes  on  sUck 
Exit:  X  p  iled  from  sUck 
Registers  Altered:  X,  SP 


Stack 


Index  Name 


07  ADDXAB  Add  Index  to  A  and  B  14 

Add  the  contents  of  the  Index  Register  to  the  two 
accumulator*,  as  a  16-bit  cum,  leaving  the  result  in 
the  two  accumulators.  The  most  significant  byte  is 
assumed  to  be  in  accumulator  A.  The  condition 
codes  are  set  according  to  the  result. 

Entry:  Addend  in  X,  augend  in  A,  B 
Exit:  Sum  in  A,  B 
Condition 

Codes:  H  *  carry  from  bit  11  to 

bit  12  of  sum 
N  *  bit  15  of  sum 
Z  *  1  if  sum  is  zero;  else  ■  0 
V  •  1  if  two’s  complement 
overflow 

C  ■  carry  out  of  bit  15  of 
sum 

Registers  Altered:  A,B,CC 


e 

08  ABDABX  Add  A  and  B  to  Index  S 
Register 

Add  the  contents  of  the  two  accumulators  to  the 
Index  register,  leaving  the  16-bit  sum  in  the  index 
register.  Accumulator  A  is  assumed  to  be  more  sig¬ 
nificant  than  accumulator  B.  The  condition  codes 
are  set  according  to  the  result. 

Entry:  Addend  in  A,  B;  augend  in  X 
Exit:  Sum  in  X 

Condition  H  *  carry  from  bit  11  to 
Codes:  bit  12  of  sum 

N  ■  bit  15  of  sum 
Z  *  1  if  sum  is  zero,  *0 
otherwise 

V  ■  1  if  two’s  complement 
overflow 

C  ■  carry  out  of  bit  15  of 
sum 

Registers  Altered  X,  CC 


Stack 

Index  Name _ Title _ Bytes 

09  ADD  AX  /  dd  A  to  Index  9 

Register 

Add  the  A  accumulator  to  the  contents  of  the 
Index  register,  and  return  the  sum  to  the  index 
register.  The  Condition  Codes  are  set  according  to 
the  result. 

Entry:  Addend  in  A,  augend  in  X 
Exit:  Sum  in  X 
Condition 

Codes:  (Same  as  ADDABX) 

Registers  Altered:  X,  CC 

0A  ADDBX  Add  B  to  Index  9 

Register 

Add  the  contents  of  the  B  accumulator  to  the 
Index  register,  and  leave  the  sum  in  the  Index 
register.  The  Condition  Codes  are  set  according  to 
the  result. 

Entry:  Addend  in  B,  augend  in  X 
Exit:  Sum  in  X 
Condition 

Codes:  (Same  as  ADDABX) 

Registers  Altered:  X,  CC 

OB  SUBXAB  Subtract  Index  from  14 

A,  B 

Subtract  the  contents  of  the  index  register  from 
accumulators  A  and  B  as  a  16-bit  difference.  The 
Condition  Codes  are  set  according  to  the  result. 

Entry:  Subtrahend  in  X,  minuend  in  A,  B 
Exit:  Difference  in  A,  B 
Condition 

Codes:  H  *=  undefined 

N  *  bit  15  of  difference 
Z  ■  1  if  result  is  zero,  *0 
otherwise 

V  *  1  if  two’s  complement 
overflow 

C  *  oorrow  into  bit  15  of 
difference 

Registers  Altered:  A,  B,  CC 


N-7 


Index  Name 


SUck 

Bytes 


Title 


OC  SUBABX  Subtract  A  and  B  from  9 

Index  Register 

Subtract  the  contents  e?  the  A  and  B  accumulators 
from  the  Index  register,  leasing  the  difference  in 
the  Index.  The  Condition  Codes  are  set  according 
to  the  result. 

Entry:  Subtrahend  in  A,  B;  minuend  in  X 
Exit:  Difference  in  X 
Condition 

Codes:  (Same  as  SUBXAB) 

Registers  Altered:  X,  CC 

OD  SUBAX  Subtract  A  from  9 

Index  Register 

Subtract  the  contents  of  the  A  accumulator  from 
the  contents  of  the  Index  register  and  return  the 
difference  to  the  index  register.  The  Condition 
Codes  are  set  according  to  the  result. 

^  Entry:  Subtrahend  in  A,  minuend  in  X 
4  •  Exit:  Difference  in  X 
Condition 

Codes:  (Same  as  SUBXAB) 

Registers  Altered:  X,  CC 

OE  SUBBX  Subtract  B  from  Index  9 

Register 

Subtract  the  contents  of  the  B  accumulator  from 
the  Index  register,  leaving  the  difference  in  the 
index  register.  The  Condition  Codes  are  set  accord¬ 
ing  to  the  result. 

Entry:  Subtrahend  in  B,  minuend  in  X 
Exit:  Difference  in  X 
Condition 

Codes:  (Same  as  SUBXAB) 

Registers  Altered:  X,  CC 


OF  P2HEX  Print  Byte  in  Hex  16 

The  byte  pointed  to  by  the  address  in  the  Index 
register  is  converted  to  hexadecimal  notation  in 
ASCII,  and  output  to  the  AC1A  located  as  follows: 
memory'  locations  BFF5-BFF6  contain  an  address 
of  a  pair  of  bytes  (indirect  pointer)  which  in  turn 
contain  the  address  of  the  ACIA  status  register. 


BFF6 

iL 

BFF5 

iH 

•  •• 

i+1 

aL 

i 

aH 

•  •• 

a+1 

ACIA  Data 

a 

ACIA  Status 

Each  byte  of  the  output  is  stored  irto  the  ACIA 
data  register  after  bit  1  of  the  Status  register  is 
true.  The  Control  register  of  the  AC.’A  is  not  al¬ 
tered,  and  the  Data  register  is  not  read  by  this 
routine.  The  Index  register  is  incremented  past  the 
byte  which  is  output. 

Entry:  Memory  byte  at  (X);  ACIA  at  (bff5  ) 

Exit:  (two  ASCII  bytes  output) 

Registers  Altered:  X 

10  P4HEX  Print  Address  in  Hex  15 

The  two  bytes  in  memory  pointed  to  by  the  Index 
register  are  converted  to  four  ASCII  digits  and  out¬ 
put  to  the  ACIA  located  at  the  address  pointed  to 
by  the  pointer  pointed  to  by  the  byte  pair  at 
EFF5-BFF6  (see  P2HEX).  The  Index  register  is 
incremented  by  two. 

Entry:  Two  bytes  at  (X);  ACIA  at  ((  BFF5)) 

Exit:  (four  ASCII  bytes  output) 

Registers  Altered:  X 

11  PRINTA  Print  the  Byte  in  A  10 

The  byte  in  accumulator  A  is  output  to  the  ACIA, 
the  address  of  whose  address  is  in  locations  bff5- 
BFF6.  Ho  registers  are  altered  except  the  ACIA 
data  register. 

Entry:  Character  in  A 
Exit:  (one  byte  output) 

Registers  Altered :  None 


9-6 


Index 

Name 

Title 

Stack 

Bytes 

12 

PMSG 

Print  Message  String 

12 

A  message  string,  the  first  byte  of  which  is  pointed 
to  by  the  Index  register,  is  output  to  the  ACIA,  the 
address  of  whose  address  is  in  locations  BFF5 
BFF6.  The  string  is  terminated  by  an  ASCII  EXT 
(“hex  04),  and  the  Index  register  is  left  pointing  to 
that  byte  on  return. 

Entry:  Character  string  to  (X)  terminated  by  04; 
ACIA  at  ((  BFF5)) 

Exit:  (in  ASCII  bytes  output),  X  pointing  to  04 
byte 

Registers  Altered:  X 


13  VALAN  Validate  AlphaNumeric  11 

The  character  pointed  to  by  the  Index  register  is 
analyzed,  and  the  Carry  flag  is  set  if  it  is  a  letter  or 
digit;  if  it  is  not  a  hexadecimal  digit,  the  Overflow 
flag  is  set.  Other  than  the  condition  codes,  no  regis- 
ters  are  altered. 

Entry:  Memory  byte  (ASCII)  at  (X) 

Exit:  Condition 

Codes:  I!  ■  undefined 

N  *  undefined 
Z  -  0 

V  ■  0  if  character  in  range 
0-9,  A— F;  else  •  1 
C  ■  1  if  character  in  range 
0—9,  A— Z;  else  ■  0 

Registers  Altered:  CC 


14  INPUTA  Input  ACIA  byte  to  A  9 

One  byte  is  input  from  the  ACIA,  the  address  of 
whose  address  is  at  location  BFF5-BFF6  ,  and  this 
byte  is  returned  to  accumulator  A.  The  ACIA  is 
not  written  to,  and  except  for  the  A  accumulator, 
no  registers  are  changed.  (RS)3  samples  bit  0  of  the 
status  register  of  the  ACIA,  and  when  it  goes  to 
one,  reads  the  data  register.  The  input  byte  has  bit 
7  removed  (set  to  zero). 

Entry:  (one  byte  input) 

Exit:  Character  in  A,  bit  7“0 
Registers  Altered:  A 


Stack 

Index  Name _ Title _ Bytes 

15  CONHB  Convert  Hex  String  11 

to  Binary 

A  string  of  characters  in  memory*  beginning  at  the 
address  in  the  index  register  is  scanned  for  valid 
Hexadecimal  digits;  when  one  is  found,  it  and  all 
immediately  following  hex  digits  are  converted  to 
a  binary  number,  which  is  left  in  the  A  and  B 
accumulators  (A  is  more  significant).  When  this 
routine  is  called,  the  maximum  length  of  the  string 
is  in  the  B  accumulator.  On  exit,  the  Carry  flag  is 
set  to  one  if  the  conversion  resulted  in  a  valid 
binary  number,  and  the  index  register  is  left  point- 
ing  to  the  next  character  in  the  string,  or  if  the 
string  is  exhausted  before  finding  any  hex  digits,  to 
the  last  character  of  the  string. 

Entry:  Character  string  (including  ASCII  hex  num¬ 
ber)  at  (X) 

Max  string  length  in  B  (<128) 

Exit:  Binary  number  in  A,  B 
Condition 

Codes:  H  ■  undefined 

N  «  undefined 
Z  ■  undefined 
V  ■  undefined 
C  *  1  if  valid  number;  *  0  if 
not 

Registers  Altered:  A,  B,  X,  CC 


16  INDEX  Multiply  A  X  B  and  12 
Add  to  Index 

The  contents  of  the  A  accumulator  is  multiplied  by 
the  contents  of  the  B  accumulator,  and  the  prod¬ 
uct  is  added  to  the  Index  register.  The  Condition 
Codes  are  set  according  to  the  result. 

Entry:  Multiplicand  in  A,  Multiplier  in  B,  augend 
in  X 

Exit:  Sum  in  X 
Condition 

Codes:  (Same  as  ADDABX) 


Index  Name 


Title 


Stack 

Bytes 


17  MUL8  Multiply  A  Time*  B  12 

Multiply  the  contents  of  the  A  accumulator  times 
the  contents  of  the  B  accumulator,  and  leave  the 
product  in  both  accumulators  as  a  16-bit  number, 
with  the  most  significant  part  in  A.  This  is  an  un¬ 
signed  multiply,  and  if  either  or  both  of  the  factors 
is  negative  (two’s  complement  signed)  the  product 
will  not  be  a  true  signed  product  of  the  signed 
factors,  as  may  be  seen  in  this  formula: 

(-n)  X  (m)  •  (256  -  n)  X  m  »  256m  +  (-nm) 

The  condition  codes  are  nonetheless  set  according 
to  the  result 

Entry:  Multiplicand  in  A,  multiplier  in  B 
Exit:  Product  in  A,  B 
Condition 

Codes:  H  *  undefined 

N  *  bit  15  of  product 

V-  0 

Z  *  1  if  product  is  zero; 
otherwise  *  D 

C  -  0 


Registers  Altered: 


A.B.CC 


Data  from  the  Optical  Shaft  Encoder  and  Ultrasonic 
Sonar  subsystems  are  gathered  every  0.1  second  via  the 
Extended  Interrupt  Handler  (see  Appendix  B)  and  stored  into 
a  temporary  line  buffer  in  the  Navigation  Computer's  memory 
as  follows! 

/time/fw/ 1 wl/ 1 w2/rwl/rw2/A# _ /B# _ /C# _ /D# _ /<CRXLF> 

Where  time  «  tenth's  of  seconds  count  -  2  bytes 
fw  =  front  wheel  direction  -  1  byte 
lwl  »  left  wheel  reverse  counts  -  2  bytes 
lw2  “  left  wheel  forward  counts  -  2  bytes 
rwl  ®  right  wheel  reverse  counts  -  2  bytes 
rw2  *»  right  wheel  forward  counts  -  2  bytes 

A,  B,  C,  or  D  refer  to  Sonar  transducer  selected  and  range 

of  closest  object  except  where  an  astrisk  (*)  indicates  no 

transducer  selected. 

% 

All  numbers  are  hexadecimal  except  the  sonar  ranges  which 
are  decimal  feet. 


Test  Data  for  Robot  Integrated  Operation  Test  #  20 

/ 000 1 / 49/0000/0000/0000/000 1 / A2  7.2/B*15. 1/C0  2.5/DI  9.4/ 
/0002/49/0000/0000/0000/0001/A019.3/B1  4.7/C2  3.9/D*10.7/ 
/0003/49/0000/0000/0000/0001/A111.2/E2  2. 9/C*l 1 . 3/D0  7.1/ 
/ 0004/ 49/0000/ 0000/0000/ 000 1 / A2  7 . 4/B* 1 3. 7/C0  2.4/BI  S.4/ 
/ 0005/ 49 / 0000/ 0000/ 0000/000 1  / A1^  12. 6/B0  6.1/Cl  3.0/D2  9.9/ 


0-1 


/0006/49/0000/0000/0000/0001/A411.6/B5  3.5/C6  6.9/D*10.2/ 
/ 0007/ 49/0000/0000/0000/000 1 / A5  8.2/B6  2. 6/C*l 1 . 9/D4  7.3/ 
/0003/49/0000/0000/0000/0001/A&  6 . 2/B* 1 4 . 7/C4  2.7/D5  9.0/ 
/0009/49/0000/0000/0000/0001/A*17.3/B4  6.4/C5  3.5/D610.0/ 
/ 000 A/ 49/0000/0000/0000/000 1 / A0 14. 2/BI  4.9/C2  3.8/0*10.1/ 
/000B/49/0000/0000/0000/0001/A111.2/B2  2. 9/C*l 1 . 3/D0  7.0/ 
/000C/ 47 / 0000/ 0000/0000 / 000 1 / A2  7 . 2/B*14. 9/C0  2.5/DI  7.4/ 
/ 000D/ 47/ 0000/ 0000/0000/000 1 / A*1 2. 9/B0  6.2/Cl  3.0/D210.2/ 
/000E/48/0000/0000/0000/0001/A411.7/B5  3.4/C6  7.0/D*  9.9/ 
/000F/48/0000/0000/0000/0001/A5  8.1/B6  2.7/C*14. 3/04  7.3/ 
/ 00 10/ 48/0000/0000/0000/000 1 / A6  6.3/B*13. 1/C4  2.8/DS  9.1/ 
/ 001 1 / 48/0000/0000/0000/000 1 / A*1 7. 5/B4  6.4/C5  3.4/D611.2/ 
/ 00 12/ 48/0000/0000/0000/0002/ A013. 1/BI  4.8/C2  3.8/D*10. 1/ 
/0013/43/0000/0000/0000/0002/A1U.2/B2  3. 0/C*l  1 . 3/D0  7.1/ 
/ 00 14/48/ 0000/000 1/0000/0002/ A2  7. 3/B* 14. 8/C0  2.5/DI  7.3/ 
/0015/48/0000/0001/0000/0003/A*14.8/B0  6.1/Cl  3.1/D2  8.5/ 
/0016/4S/0000/0002/0000/0003/A41 1 . 6/B5  3.6/C6  7.3/D*  8.2/ 
/0017/48/O000/0003/0000/0004/A5  8.2/B6  2. 9/C*14. 7/D4  7.2/ 
/0018/47/0000/0004/0000/0005/A6  6. 4/B*12. 2/C4  2.9/D5  9.1/ 
/001 9/47/0000/0005/0000/ 0006/A* 17. 4/B4  6.4/C5  3.8/D610.4/ 
/001A/47/0000/0006/0000/0003/A013.4/B1  5.7/C2  5.3/D*10.2/ 
/001B/47/0000/0007/0000/0009/A110.7/B2  3.4/C*11.4/D0  7.0/ 
/001C/47/0000/0009/0000/000A/A2  7 . 3/B* 13 . 0/C0  3.2/DI  7.4/ 
/00 1D/47/0000/000A/000 1 /000B/A*1 5. 5/B0  6.2/Cl  3.6/D2  8.5/ 
/001E/47/0000/000B/0001/000D/A414. 5/B5  4.6/C6  6.8/0*10.0/ 
/001F/47/0000/000D/0001/000E/A5  8.8/B6  3. 7/C*14. 1/D4  7.3/ 
/0O20/47/0000/000E/0001/000F/A6  6. 3/B*l 1 . 5/C4  3.6/D510.2/ 
/0021/46/0000/000F/000 1/001 1 /A*14. 7/B4  6.5/C5  4.8/D611.2/ 
/0022/46/0000/001 1/0001 /00 12/ A0 12. 8/BI  6.S/C2  6.6/D*10.1/ 
/0023/46/0000/0012/0001/0013/A110. 1/B2  4. 4/C*10. 1 /D0  7.1/ 
/0024/46/0000/0013/0001 /0015/A2  7. 1 /B*12. 9/C0  4.0/DI  7.3/ 
/0025/46/0000/0015/0001 /0016/A*12. 8/B0  6.2/Cl  4.7/D2  8.1/ 
/0026/46/0000/0016/0001 /00 17/A414. 7/B5  5.7/C6  7.1/D*  9.9/ 
/0027/46/0000/0017/0001/0019/A5  9.6/B6  4 . 6/C*14. S/D4  7.3/ 
/t •23/46/0000/0013/0001/001A/A6  6. 4/B*14. 6/C4  4.7/D510.1/ 
/0029/46/0000/001 A/0001 /001B/A*17. 6/B4  6.3/C5  6.3/D610.7/ 
/002A/45/0000/001B/0002/001C/A01 1 . 1/BI  6.9/C2  7.1/D*  9.0/ 
/002B/45/0000/001C/0002/001E/A1 12. 9/B2  5. 4/C*l 1 . 6/D0  7.1/ 
/002C/45/0000/001 E/0002/00 IF/ A2  6. 8/B*14. 0/C0  5.0/DI  7.5/ 
/002D/45/0000/001F/0002/0020/A*17. 1/B0  6.2/Cl  5.5/D210.0/ 
/002E/45/0000/0020/0002/0022/A417. 5/B5  6.8/C6  7.0/D*  9.9/ 
/002F/44/0000/0022/0002/0023/A5  t\9/B6  5. 5/C*14. 4/D4  7.4/ 
/0030/44/0000/0023/0002/0024/A6  6. 4/B*14. 5/C4  5.5/D5  9.5/ 
/0031/44/0000/0024/0002/0025/A*15. 1/B4  6.5/C5  7.2/D6U.4/ 
/0032 / 44/0000 / 0025/0002 /0027/A0 14. 9/BI  7.1/C2  6.6/D*10.0/ 
/0033/44/0000/0027/0002/0028/A1 1 1 . 8/B2  6. 2/C*l 1 . 8/D0  7.1/ 
/0034 / 44/0000/0023/0003/ 0029 /A2  6. 8/B*13. 0/C0  5.8/DI  7.5/ 
/0035/44/0000/0029/0003/002B/A* 12. 8/B0  6.2/Cl  6.3/D210.2/ 
/0036/43/0000/002A/0003/002C/A416. 6/B5  7.9/C6  7.0/D*  9.8/ 
/0037/43/0000/002C/0003/002D/A5  8.3/B6  6. 3/C*14. 0/D4  7.3/ 
/0038/43/0000/002D/0003/002E/A6  6. 4/B*12. 3/C4  6.6/D5  9.1/ 
/0039/43/0000/002E/0003/0030/A*18. 0/B4  6.6/C5  6.6/D6  9.8/ 


0-2 


/003A/43/0000/0030/0003/0031/A010.3/B1  6.8/C2  6.9/0*10.3/ 
/003B/43/0000/0031/0003/0032/A1 11. 5/B2  7.1/0*11.7/00  7.1/ 
/003C/43/0000/0032/0003/0033/A216. 9/B*13. 0/C0  6.5/01  8.8/ 
/ 0030/43/0000/0033/ 0003/0035/ A* 17. 4/B0  6.3/Cl  6.7/02  8.5/ 
/003E/42/0000/0035/0004/0036/A4  9.6/B5  8.5/06  7.3/0*  9.7/ 
/003F/42/0000/0036/0004/0037/A5  7.9/B6  7.2/0*14.3/04  7.3/ 
/0040/42/0000/0037/0004/0038/A6  6. 4/B*l 1 .8/04  7.0/05  9.0/ 
/004 1 /42/0000/0033/0004/003A/ A* 1 7 . 9/B4  6.5/C5  7.9/0610.3/ 
/0042/42/0000/003A/0004/003B/A014. 6/BI  7.2/02  6.6/0*10.2/ 
/0043/42/0000/003B/0004/003C/A1 10. 8/B2  7.9/0*13.3/00  7.1/ 
/ 0044/42/0000/0030/0004/ 003E/A2  7.2/0*14.6/00  6.6/01  8.2/ 
/0045/41 /0000/003D/0004/003F/A*18. 0/B0  6.1/Cl  6.7/0210.2/ 
/0046/41/0000/003F/0004/0040/A410. 4/B5  9.6/C6  7.3/0*10.1/ 
/ 0047/4 1 /0000/0040/0004/0041 /A510. 4 /B6  8.0/0*14.8/04  7.4/ 
/0048/41 /0000/004 1 /0004/0043/A6  6. 3/B*14. 6/C4  8.1/0510.4/ 
/ 0049/41 /0000/0042/0005/0044/A*17. 6/B4  6.5/05  6.9/0612.5/ 
/004A/41 /0000/0044/0005/0045/A014. 2/BI  7.3/02  7.5/0*10.3/ 
/004B/4 1/0000/0045/0005/0046/  11. 3/B2  8.7/0*11.3/00  7.1/ 
/004C/41 /0000/0046/0005/004S/A2  7.0/B*14.4/C0  6.7/01  7.8/ 
/ 0040/40/0000/0047/0005/0049/ A* 17. 4/B0  6.2/Cl  6.7/02  8.4/ 
/004E/40/0000/0049/0005/004A/A414. 0/B5  8.1/C6  7.3/0*10.1/ 
/004F/40/0000/004A/0005/004B/A5  8.7/B6  8.7/0*14.5/04  7.5/ 
/0050/40/0000/004B/0005/004D/A6  6.3/B*  9.9/04  8.1/05  9.8/ 
/0051 /40/0000/004C/0005/004E/A*16. 7/B4  6.3/05  8.2/0611.5/ 
/0052/40/0000/004E/0003/004F/A0  9.8/BI  7.3/C2  7.3/0*  9.9/ 
/0053/40/0000/004F/0006/0051/A1 11. 4/B2  8. 8/0*12. 6/D0  7.1/ 
/0054/40/0000/0050/0006/0052/A2  6. 7/B*14. 4/C0  6.8/01  8.0/ 
/0055/40/0000/0052/0006/0053/A*17. 4/B0  6.2/01  6.6/0210.2/ 
/0056/40/0000/0053/0006/0054/A413. 3/B5  8.5/06  7.2/0*10.6/ 
/0057/3F/0000/0054/0006/0056/A5  9.0/B6  9.7/0*14.9/04  7.4/ 
/0058/3F/0000/0055/0006/0057/A6  6. 4/B*14. 2/C4  8.1/05  9.3/ 
/0059/3F/0000/0057/0006/0058/A*17. 3/B4  6.5/05  6.8/0611.9/ 
/005A/3F/0000/0058/0007/0059/A012. 5/BI  9.9/02  7.1/0*10.0/ 
/005B/3E/0000/0059/0007/005B/A1 11. 4/B2  8.6/0*11.4/00  7.3/ 
/005C/3E/0000/005A/0007/005C/A2  7.2/B*14.6/C0  6.7/01  9.0/ 
/005D/3E/0000/005C/0007/005D/A*17. 9/B0  6.2/Cl  6.7/02  9.7/ 
/005E/3D/0000/005D/0007/005E/A412. 3/B5  9.1/06  7.3/0*  9.8/ 
/005F/3D/0000/005E/0007/0060/A5  8.5/B6  8.4/0*13.5/04  7.3/ 
/0060/3D/0000/005F/0007/0061/A6  6. 1/B*14.6/C4  8.2/05  9.5/ 
/006 1 /3D/0000/0061 /0007/0062/ A* 17. 9/B4  6.5/05  6.6/0611.7/ 
/0062/3C/0000/0062/0007/0063/A01 1 . 6/BI  6.8/02  6.8/0*10.4/ 
/ 0063/3C/0000/0063/0008/0065/A1 11. 3/B2  9.7/0*13.3/00  7.1/ 
/0064/3C/0000/0064/0008/0066/A2  7. 2/B*14. 7/00  6.7/01  8.6/ 
/ 0065/30/0000/0066/0008/0067/ A* 1 2. 8/B0  6.2/01  6.9/0210.2/ 
/0066/3C/0000/0067/0008/0069/A41 1 . 7/B5  9.6/06  7.5/0*  9.8/ 
/0067/3C/0000/0063/0008/006A/A5  7. 9/B61 1 . 3/0*14. 4/D4  7.4/ 
/006S/3C/(-000/006A/0008/006B/A6  6. 3/B*12. 3/04  8.2/05  8.1/ 
/0069/3C/0000/006B/0008/006C/A*lS. 4/B4  6.5/05  8.1/0611.2/ 
/006A/3C/0000/006C/0008/006E/A010. 7/BI  7.1/C2  7.2/0*10.7/ 
/006B/3C/0000/006D/0008/006F/A1 10. 6/B2  9.8/0*13.1/00  7.1/ 
/006C/3C/0000/006F/0009/0070/A2  7. 2/B*14. 4/C0  6.7/01  8.2/ 
/006D/3B/0000/0070/0009/0071 /A*14. 5/B0  5.8/01  6.8/0210.9/ 
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/006E/3B/0000/007 I /0009/0073/A4 1 0 . 7/B5 1 0 , 7/C6  7 . 7/D* 10. 7/ 
/006F/3B/0000/0072/0009/0074/A512. 4/B612. 1 /C*14. 6/04  7.4/ 
/0070/3B/ 0000/0074/0009/0075/ A6  6.4/B*ll .0/04  8.1/0510.9/ 
/0071 /3B/0000/0075/0009/0076/A*18. 2/B4  6.6/C5  8.2/D610.3/ 
/0072/3B/0000/0076/0009/0078/A010.0/B1  7.5/C2  8.1/0*10.9/ 
/0073/3B/0000/0077/0009/0079/A110.0/B2  9. 7/C*14.0/D0  7.2/ 
/0074/3B/0000/0079/0009/007A/A2  7.1/3*13.2/00  6.7/DI  7.9/ 
/0075/3B/0000/007A/0009/007B/A*17. 5/B0  6.1/Cl  7.2/0210.2/ 
/0076/3A/0000/007B/0009/007D/A410. 1/B5  8.0/C6  7.4/0*10.1/ 
/0077/3A/0000/007C/000A/007E/A5  9.7/B6  9. 7/C*14. 2/04  7.5/ 
/0078/3A/0000/007E/000A/007F/A6  6. 3/B*14.5/C4  8.3/D510.5/ 
/0079/3A/0000/007F/000A/0030/A*18.0/B4  6.2/C5  8.1/06  9.6/ 
/007A/3A/0000/0080/000A/0082/A0  9.1/BI  7.3/C2  7.8/0*  9.3/ 
/007B/3A/0000/0081/000A/0033/A 1  9.8/B2  9.7/C*  9.9/00  7.3/ 
/007C/3A/0000/0032/000A/0034/A2  6. 7/B*15. 2/C0  6.7/01  8.1/ 
/007D/3A/0000/0084/000A/0085/ A* 17. 1 /B0  6.1 /Cl  7.2/0210.3/ 
/007E/3A/0000/0085/000A/0086/A4  9.3/B5  8.4/C6  7.3/0*11.3/ 
/007F/3A/0000/0086/000A/00S8/A5  8. 7/B61 1 . 2/C*14. 9/04  7.5/ 
/0080/3A/0000/0087/000A/0089/A6  6. 4/B*12. 2/C4  8.2/05  9.9/ 
/ 0081 /3A/0000/0089/000B/008A/A*18. 8/04  &.2/C5  8,2/06  8.7/ 
/0082/3A/0000/008A/000B/008B/A0  8.3/BI  9.1/C2  7.9/0*  9.8/ 
/0083/39/0000/008B/000B/003D/A1 10. 1 /B21 0.0/C* 10. 1/D0  7.4/ 
/0034/39/0000/003C/000B/008E/A2  6.9/B*14. 7/C0  6.7/DI  9.1/ 
/0085/39/0000/008E/000B/008F/A*l7. 3/00  6.1/Cl  6.8/02  8.5/ 
/0086/39/O00O/008F/000B/0090/A4  8.6/B5  9.0/C6  7.3/0*10.5/ 
/0087/39/0000/0090/000B/0092/A5  8.4/B6  8. 4/C*14. 4/04  7.6/ 
/0088/39/0000/O091/000B/0093/A6  6. 2/B*15.4/C4  8.2/D5  9.5/ 
/008cV39/0000/0093/000B/0094/A*15. 7/B4  6.5/C5  8.3/06  8.0/ 
/008A/38/0000/0094/000C/0095/A0  7.5/BI  6.6/C2  7.7/D*11.3/ 
/008B/38/0000/0095/000C/0096/A1  8.5/B2  9.8/C*14.6/D0  7.4/ 
/008C/38/0000/0096/000C/0098/A2  7.2/B*15.0/C0  7.2/01  9.2/ 
/00SD/37/0000/0097/000C/0099/A*20. 6/B0  6.1/Cl  7.9/D2  8.4/ 
/00SE/37/0000/0099/000C/009A/A4  7.8/B5  9.4/C6  7.5/0*11.3/ 
/008F/37/0O00/009A/000C/009B/A3  7. 8/B610. 1 /C*15. 3/04  7.7/ 
/0090/37/0000/009B/000C/009C/A6  6. 1 /B*16. 0/C4  8.1/0510.2/ 
/O091 /37/0000/009C/000C/009E/A*20. 5/B4  6.4/C5  8.1/D6  7.0/ 
/ 0092/37/0000 /009D/000C /009F / A0  6.7/BI  6.9/C2  7.0/D*11.3/ 
/0093/37/0000/009E/000D/00A0/A1  7. 5/B210. 3/C*14. 4/00  7.4/ 
/0094/37/0000/00A0/000D/00A1/A2  7. 1 /B*14. 6/C0  7.1/01  8.7/ 
/0095/37/0000/00A1 /000D/00A2/A*17. 9/B0  6.1/Cl  7.4/0210.0/ 
/0096/37/0000/00A2/000D/00A3/A4  6.7/B5  9.0/C6  7.5/0*10.9/ 
/0097/37/0000/00A3/000D/00A5/A5  7. 6/B614. 5/C*14. 5/04  7.7/ 
/0093/37/0000/00A4/000D/00A6/A6  6. 5/B*14.7/C4  8.2/05  9.7/ 
/0099/37/0000/00A5/00OE/00A7/A*19. 6/B4  6.4/C5  8.2/06  6.4/ 
/009A/37/0000/00A7/000E/00A3/A0  5.9/BI  7.3/C2  8.3/0*10.8/ 
/009B/37/0000/00A8/000E/00A9/A1  6. 7/B210. 2/C*14. 4/00  7.4/ 
/009C/37/0000/00A9/000E/00AA/A2  7. 1 /B*14. 4/C0  6.7/01  8.4/ 
/009D/37/0000/00AA/000E/00AC/A*16.9/B0  6.0/Cl  6.7/02  6.2/ 
/009E/37/0000/00AB/000E/00AD/A4 10. 6/B5  7.8/C6  7.5/D*10.7/ 
/009F/37/0000/00AD/000E/00AE/A5  6. 7/B610. 0/C*15. 6/D4  7.7/ 
/00A0/37/0000/00AE/000E/00AF/A6  6. 5/B*15. 5/C4  8.2/D5  9.4/ 
/00Al/37/0000/00AF/000E/00B0/A*20. 5/B4  6.3/C5  8.3/D6  5.5/ 
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/00A2/36/0000/00B0/000F/O0B2/A0  5.2/BI  7.2/C2  8.5/D*11.7/ 
/00A3/36/0000/00B1/000F/00B3/A1  6. 0/B210. 1 /C*14. 6/D0  7.4/ 
/00A4/36/0000/00B2/000F/00B4/A2  6. 7/B*15. 3/C0  7.3/DI  8.2/ 
/00A5/36/00O0/00B4/000F/00B*5/A*17.2/B0  6.1/Cl  7.8/D2  5.4/ 
/00A6/36/0000/00B5/000F/0OB6/A4  5.0/B5  8.1/C6  7.6/D*11.3/ 
/00A7/36/0000/00B6/000F/00B8/A5  7. 7/B614 . 5/C*14. 6/D4  7.7/ 
/00A8/36/0000/00B7/O00F/00B9/A6  6. 3/B*14. 5/C4  8.1/D5  9.1/ 
/00A9/36/0000/00B9/000F/00BA/A*20.7/B4  6.2/C5  8.5/D6  4.9/ 
/00AA/36/0000/00BA/000F/00BB/A0  4.3/BI  7.4/C2  8.2/D*10.2/ 
/00AB/36/0000/00BB/0010/00BD/A1  5.3/B2  9. 0/C*14. 8/D0  7.4/ 
/00AC/36/0000/00BC/0010/00BE/A2  6.4/B*  8.2/C0  8.1/DI  8.1/ 
/00AD/35/0000/00BE/0010/00BF/A*16.8/B0  6.0/Cl  6.7/D2  4.7/ 
/00AE/35/0000/00BF/0010/00C0/A4  4.2/B5  8.7/C6  7.7/D*10.3/ 
/O0AF/35/0000/00C0/0010/00C2/A5  7. 4/B615. 0/C*15. 0/D4  7.6/ 
/00B0/35/O000/00C1/0010/00C3/A6  6. 2/B*12. 1/C4  8. 5/1)5  8.9/ 
/00Bl/35/0000/00C3/0010/00C4/A*20. 8/B4  6.3/C5  8.1/D6  7.6/ 
/00B2/34/0000/O0C4/0010/00C6/A0  3.5/BI  6.6/C2  8.1/D*10.1/ 
/00B3/34 /0000/00C5/0010/00C7/A1  5. 0/B210. 7/C*14. 7/D0  7.5/ 
/00B4/34/0000/00C7/0010/00C8/A2  6. 8/B*13. 4/C©  7.6/DI  8.2/ 
/00B5/34/0000/00C8/0010/00C9/A*16.9/B0  6.1/Cl  3.6/D2  8.2/ 
/00B6/33/0000/00C9/0010/00CB/A4  3.5/B5  9.4/C6  7.7/D*12.3/ 
/00B7/33/0000/00CA/0010/00CC/A5  4. 2/B614. 9/C*15. 0/D4  7,8/ 
/00B8/33/0000/00CC/00 1 1  /00CD/A6  5.9/B*13.2/C410.0/D5  3.fJ/ 
/00B9/32/0000/00CD/001 1 /O JCE/A*20. 6/B4  6.3/C5  8.5/D6  5.4/ 
/00BA/32/0000/00CE/001 1/00CF/A0  2.7/BI  6.9/C2  8.2/D*  9.0/ 
/00BB/32/0000/00CF/001 1/00DI/AI 10. 4/B210. 0/C*13. 5/D0  7.  5/ 
/00BC/32/0000/00D0/001 1/00D2/A2  6. 5/B*15. 1/C0  7.6/DI  7.9/ 
/00BD/31/0000/00D 1/001 1/00D3/A*17. 6/B0  5.9/Cl  8.2/D2  8.6/ 
/00BE/31/0000/00B2/001 1/00D4/A412. 1/B5  9.9/C6  7.9/D*10.1/ 
/00BF/31/0000/00D3/001 1 /00D4/A5  3.7/B615.0/C*15.0/D4  7.8/ 
/00C0/31/0000/00D3/0011/00D5/A6  6. 4/B*12. 5/C4  8.2/D5  3.3/ 
/00C1/31/0000/00D3/001 1/00D5/A*18. 0/B4  6.3/C5  8.4/D6  4.0/ 
/00C2/3 1 /0000/00D4/00 1 1 /00D5/ A0  2.1/Bl  7.1/C2  8.2/D*11.7/ 
/00C3/31/0000/00D4/001 1/00D5/A1  9.2/B2  9. 1/C*14.5/D0  7.5/ 
/00C4/31 /0000/00D4/001 1 /00D5/ A2  6. 4/B*13. 2/C0  8.1/DI  8.1/ 
/00C5/31/0000/00D4/0O1 1 /00D5/A*20. 0/B0  5.8/Cl  8.1/D2  8.5/ 
/00C6/31/0000/00D4/001 1 /00D5/A4  2. 3/B510. 2/C6  7.8/D*11.5/ 
/00C7/31/0000/00D4/001 1 /00D5/A5  3. 7/B614. 4/C*14. 4/D4  7.7/ 
/00C8/31/0000/00D4/001 1/00D5/A6  6. 2/B*12. 6/C4  8.7/D5  3.4/ 
/00C9/31/0000/00D4/001 1/00D5/A*18. 3/B4  6.3/C5  9.3/D6  3.9/ 
/00CA/31/0000/00D4/001 1/00D5/A0  2.2/BI  7.1/C2  8.5/D*11.5/ 
/00CB/31/0000/00D4/001 1 /00D5/A1  9.1/B2  9.0/C*14.5/D0  7.5/ 
/00CC/31/0000/00D4/001 1/00D5/A2  6. 5/B*13. 0/C0  7.5/DI  8.1/ 
/00CD/31 /0000/00D4/001 1/00D5/A*17. 5/B0  5.8/Cl  8.2/D2  8.5/ 
/00CE/31 /0000/00D4/001 1/00D5/A4  2. 4/B510. 1 /C6  7.8/D*10.1/ 
/00CF/31 /0000/00D4/001 1 /00D5/A5  3.7/B617.8/C*14.5/D4  7.8/ 
/00D0/31 /0000/00D4/001 1/00D5/A6  6. 3/B*14. 1 /C414. 2/D5  3.3/ 
/0OD1/31/0000/00D4/001 1/00D5/A*20. 6/B4  6.3/C5  9.7/D6  3.9/ 
/00B2/31/0000/00D4/001 1/00D5/A0  2.1/Bl  7.1/C2  8.4/D*14.8/ 
/00D3/31 /0000/00D4/001 1 /00D5/A1  9.2/B2  9. 1/C*14.8/D0  7.5/ 
/00D4/31/0000/00D4/001 1/00D5/A2  6. 4/B*14.8/C010. 4/DI  8.2/ 
/00D5/31/0000/00D4/001 1 /00D5/A*19. 9/B0  5.8/Cl  1 1 . 3/D2  8.6/ 
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/ 0006/31/0000/0004/001 1/00D5/A4  2.3/B510. 2/C6  7.8/D*14.8/ 
/00D7/31/0000/00D4/001 1/00D5/A5  3. 7/B618. 0/0*18. 1/D4  7.7/ 
/00B3/31 /0000/00D4/001 1 /00D5/ A6  6.2/B*14. 1/C414. 1/D5  3.4/ 
/00D9/31/0000/00D4/001 1/00D5/A»20.5/B4  6.3/C5  9.6/D6  3.9/ 
/00BA/31/0000/00D4/001 1/00D5/A0  2.2/BI  7.1/C2  8.5/0*14.9/ 
/00DB/31/0000/00D4/0011/00D5/A1  9. 1/B2  9. 1/C* ^4. 7/D0  7.5/ 
/00DC/31 /0000/00D4/001 1 /00D5/A2  6.5/B*14.8/C0  8.2/DI  6.1/ 
/00BD/31/0000/00D4/001 1/00D5/A*19. 8/B0  5. 8/Cl  1 1 . 3/D2  8.6/ 
/00BE/31/0000/00D4/001 1  /00D5/A4  2. 3/B510. 1  /C-6  7.9/D*14.7/ 
/00DF/31/0000/00D4/001 1/00D5/A5  3. 7/B615. 1 /C*15. 0/D4  7.8/ 
/00E0/31/0000/00D4/001 1/0005/ A6  6.2/B*14. 1/C414.0/D5  3.3/ 
/00E1 /31/0000/00D4/001 1/00D5/A*20. 6/B4  6.3/C5  9.7/D6  3.9/ 
/00E2/31/0000/00D4/001 1/00D5/A0  2.1/BI  7. 1/C2  8.3/0*13.0/ 
/00E3/31/0000/00D4/001 1/00D5/A1  9.2/B2  9. 0/C*14. 8/D0  7.6/ 
/00E4/31/0000/00D4/001 1/00D5/A2  6.4/B*17.8/C0  8.1/01  8.1/ 
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